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2 
3 
4 
5 
6 
7 
6 
9 
10 
11 
12 
13 
14 
15 

le 

17 
16 
19 
20 
21 
22 
23 
24 
25 
26 
27 
26 
29 
30 
31 
32 
33 
34 
35 
36 
37 
36 
39 
40 
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SEQ 0001 



.TITLE CVMJAAO MSVll 
.NLIST TOC 
REM 



J MEMORY 01 AG. 



PRODUCT CODE 
PRODUCT NAME 
PRODUCT DATE 
MAINTAINER: 



IDENTIFICATION 



AC-U135A-MC 



CVMJAA MSVll J MEMORY DIAGNOSTIC 
MARCH 1985 
E.S.D. METHODS 



The information in this document is subject to change 
without notice and should not be construed as a commitment 
by Digital Equipment Corporation. Digital Equipment 
Corporation assumes no responsibility for any errors that 
may appear in this manual. 

The software described in this document is furnished to the 
purchaser under a license for use on a single computer 
system and can be copied (with inclusion of Digital's 
copyright notice) only for use in such system, except as may 
otherwise be provided in writing by Digital. 

Digital Equipment Corporat-on assumes no responsibility for 
the use or reliability of its software on equipment that is 
not supplied by Digital. 



COPYRIGHT CO 1985 Digital Equipment Corporation 



CI 
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42 
43 
44 
45 
46 
47 
46 
49 
50 
51 
52 
53 
54 
55 
56 
57 
58 
59 
60 
61 
62 
63 
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OPERATIONAL SWITCH SETTINGS 
SWITCH REGISTER DEFINITIONS 



SEQ 0002 



SWITCH 



15 
14 
13 
12 
11 
10 
9 
8 
7 
6 
5 
4 
3 
2 
1 
0 



USE 



HALT ON ERROR 

LOOP ON TEST 

INHIBIT ERROR TYPEOUTS 

INHIBIT RELOCATION 

QUICK VERIFY 

BELL ON ERROR 

LOOP ON ERROR 

HALT PROGRAM (UNRELOCATED RESTORE LOADERS) 

DETAILED ERROR REPORTS 

INHIBIT CONFIGURATION MAP 

LIMIT MAX ERRORS PER CANK 

FAT TERMINAL (132 COLUMNS OR BETTER) 

TEST MODE SEE DOCUMENT 

TEST MODE - SEE DOCUMENT 

TEST MODE SEE DOCUMENT 

DETECT SINGLE BIT ERRORS 
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65 




66 




67 




68 


1.0 


69 




70 


• • 

1 . 1 


71 


1.2 


IC 


1 . 5 


73 


1.4 


m 


1 . 3 


75 




7* 
'O 


O A 


77 

1 f 




7A 

'0 


c. I 


70 


d.c. 


00 


£. O 


• 1 
Oi 




Be 




• T 

Od 




•A 




03 




OO 


J.I 


0 ' 


3 . C 


aa 

00 


0 . O 


ao 

OTf 




on 


. u 


oi 




03 
7c 


^ . u 


OT 




OA 


3 • I 


o^: 




Ok 




07 

7 1 


ft 0 


oa 

70 




OO 

77 


fs 1 

D . 1 


1 on 


O . c 


1 /M 

lUl 






7 0 


103 




104 


7.1 


105 


7.2 


106 


7.3 


107 


7.4 


108 


7.5 
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110 
111 

112 1.0 GENERAL PROGRAM INFORMATION 

113 

114 

115 1.1 Program Purpose (Abstract) 

116 

117 a. Intended for use on all PDP-11/23/23B/73' s which meet the conditions 

lie in 1.2.1. 

119 

120 b. This program will be used by system managers and operators to 

121 determine the correct operation of main memory and also it will 

122 be primarily used by field service and manufacturing to isolate 

123 failures to the memory and to isolate failures within the memory 

124 to the correct card. 
125 

126 c. The object of this software is to functionally test and verify 

127 all mam memory functions as fast as possible. 
128 

129 d. There is the capability of testing mixed configurations (MSVll-L, 

130 and MSVll-P) on the system. 
131 

132 «• It has a special maintenance mode (Field Service Mode) to provide 

133 specific functional capabilities. 
134 

135 
136 

137 1.2 System Requirements 

130 

139 1.2.1 Hardware Requirements - 

140 

141 PnP-ll/23/23B/44/83/84 CPU with 18/22 bit addressing and at 

142 least 64K (16 Bit Words) of Memory and Memory Management. 
143 

144 

145 «*«*♦♦ NOTE ****** 
146 

147 1. Like memory types must be on 16K word boundaries 

146 starting at physical address 0. 
149 

150 2. REFERENCE KTJll document for proper configuration 

151 of unibus memory for 11/84 



SEQ 0004 
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189 

190 

191 

192 

193 

194 

195 
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SEQ 0005 



1.2.2 Software Requirements 

This program is designed to run stand alone or under any of the 
following monitors: 

XXDP* 

ACT 

APT 



1.3 Related Documents And Standards 

1. Microcomputers and Memories (EB-20912-20) 

2. PDP-11/23 User's Guide 

3. MSVll-J Users guide 

4. MSVll-L Users Guide 

5. MSVll-P Technical Manual 

1.4 Diagnostic Hierarchy Prerequisites 

If the program in any way misbehaves, then: 

1. Try it again with Cache off (reference Section 2.4.3.1) 

2. Inhibit relocation (reference section 2.4.1) 

3. Try CPU Diagnostics 

4. Try Memory Management Diagnostics 

5. Try Cache Diagnostics (where applicable) 

6. Try QBUS Map Diagnostics (where applicable) 
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214 

215 
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210 

219 

220 

221 

222 
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228 

229 

230 

231 

232 

233 

234 

235 

236 

237 

2^8 

259 

240 

241 

242 

243 

244 

245 

246 

247 

248 

249 
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SEQ 0006 



1 . 5 Assumpt i ons 



This progreffl assumes the correct operation of the CPU, Memory 
Management. Cache, and the QBUS Map. This program occupies 
(initially) Bank 0 CO 16K}. The XXOP« loaders are in bank 1. 



2.0 OPERATING INSTRUCTIONS 

2.1 Loading Starting Procedures 
2.1.1 Quick Starting - 

1. Load address 200 

2. Set switch register for options (normally 0) 

3. Start 



NOTE 

BE SURE that the peripheral page jumper (where applicable) 
is in place: failure to do so sends the diagnostic to 
Never-Never Land. 



2.1.2 Stopping - 

1. Set SUB, and/or 

2. Type control "C" (Reference section 2.4.4.1). 

2.1.3 Restarting (Preserve Configuration Table) - 

1. Load address 202 

2. Set switch register for options (Normally 0) 

3. Start 



HI 
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SEQ 0007 



0^ 1 






CJC 












C J'* 






CJJ 














c • X • 








CJ7 












cox 








IS 


HAt T ON FRPOP 




14 








TNHTRTT FRROR TYPFOliT^ 




IP 


TNHTRTT RFI Of ATTHN 
xtvixox 1 ncuu^n i xun 




1 1 




P67 


10 


RFI 1 ON FRROR 




g 


1 nnp nN frrrr 




ft 


HALT PROC^RAM fUNRFLQCATF 

tint 1 ( n wunm i v vim tt i t 


C r V 


7 


DFTAILFD FRRQR REPORT*? 


271 


6 


INHIBIT CONFIGURATION MAP 


272 


5 


LIMIT MAX ERRORS PER BANK 


273 


4 


FAT TERMINAL (132 COLUMNS 


274 


3 


TEST MODE - SEE DOCUMENT 


275 


2 


TEST MODE - SEE DOCUMENT 


276 


1 


TEST MODE SEE DOCUMENT 


277 


0 


DETECT SINGLE BIT ERRORS 



RESTORE LOADERS) 
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311 

312 

313 

314 

315 

316 

317 

318 

319 

320 

321 

322 
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SEQ 0006 



2.2 Default Test Sequence 

The following two lists give the test protocol for parity and ECC 
Memory. Tests marked with a "*" are not normally run except under ACT 
or APT. or through a Field Service Ccnmand (Reference Section 
2.4.4.8). 



2.2.1 Test Protocol For MSVll-L/P Parity Memory 



Test 

34 

6 
17 

7 

1 

2 

3 

4 

5 
21 
35 
22 
23 
26 
24 
31 
32 
33 
34 



Test Name 



Time (sec/16K) 



Soft Error Test <1 

Initial Data Test <1 

Holding I's and O's Test <1 

Address Bit Test <1 

Address Test <1 

Complement Address Test <1 

3 XOR 9 Test 1 

Rotating O's Test 1 

r^otating I's Test 1 

Marching I's and O's Test 1 
Worst Case Noise Parity Test n/a 

Refresh Test 10 

Shifting Diagonal Test 10 

Random Data Test <1 

Fast Galloping Pattern Test 20 

Sob- a -long Test 3 

Write Recovery Test <1 

Branch Gobble Test 35 

Soft Error Test <1 
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SEQ 0009 



324 




325 




326 




327 




328 


2.2.2 Test Proto 


329 




330 


Pattern 


331 




332 


5 


333 


34 


334 


6 


335 


44 


336 


14 


337 


45 


336 


36 


339 


20 


340 


37 


341 


41 


342 


42 


343 


43 


344 


46 


345 


47 


346 


10 


347 


17 


348 


7 


349 


1 


350 


2 


351 


4 


352 


5 


353 


21 


354 


* 22 


355 


26 


356 


* 24 


357 


* 31 


356 


* 32 


359 


* 33 


360 


34 


361 




362 


9 - Run only 


363 


364 




365 


At the end o 


366 


367 


«30. and #27 for 



Pattern Name 



Time (sec/16K) 



Rotat i ng 1 ' s Test 1 

Soft Error Test <1 

Initial Data Test <1 

Shifting check bits thru the CSR 5 

Basic Double Bit Error test <1 

Syndromes in CSR on DBE test <1 

Correction code test 1 

Syndromes in CSR on SBE test 1 

Check ECC Disable Test <1 

Address to CSR on DBE test 1 

Extended address to CSR test <1 

Byte write test <1 

Check SBE with ECC Disable test <1 
No CSR update on SBE with DBE test <1 

Byte Address Test <1 

Holding I's and O's Test <1 

Address Bit Test <1 

Address Test <1 

Complement Address Test <1 

Rotating O's Test 1 

Rotating I's Test 1 

Marching O's and I's Test 1 

Refresh Test 10 

Random Data Test <1 

Fast Galloping Pattern Test 20 

Sob-a-long Test 3 

Write Recovery Test <1 

Branch Gobble Test 35 

Soft Error Test <1 



9 - Run only on the first Pass when under ACT or APT 
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377 
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300 

301 

302 

303 

304 

305 

306 

307 

300 

309 

390 

391 

392 

393 

394 

395 

396 

397 

390 

399 

400 

401 

402 

403 

404 

405 

406 

407 

400 

409 

410 

411 

412 

413 

414 

415 

416 

417 

418 

419 

420 
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SEO 0010 



2.3 Special Environments 
2.3.1 XXDP* 

The first pass will be a quick verify pass if and only if it is in 
chain mode. 



2.3.2 ACT APT Automatic Mode - 

The program will not create double bit errors (OBE's) after the 1st 
pass. 



2.3.2.1 APT Execution Times - 

Here are some measured execution times for an 11/23B under APT 

1st QV Pass 2nd Pass onward 

1024K MSVll-J 30 min 30 min 

256K MSVll-L 20 min 20 min 

128K MSVll-P 20 min 20 min 

The first pass will be a quick verify pass 



NOTE 

Even though the first pass is a QV pass 
it takes longer than the subsequent 
non-QV passes due to the fact that it is 
running more patterns, some of which 
(patterns <r24 and <>33 for example) can 
be extrememly time consuming. 
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2.Z.2.2 APT Environment Table 

The following table gives some of the standard sett'ngs for the APT 
E-Table. They may be modified as noted as the user sees fit. 

FIRST PASS RUN TIME: 

This parameter should be set according to the amount and type of 
memory to be tested. The above table (APT Execution Times) gives some 
measured times. For any patterns deleted (through use of the Device 
Descriptor Words) reference section 2.2 for individual pattern times. 

NOTE 

The times given in section 2.2 are for 
16K chunks of memory, not 128K boards! 



LONGEST TEST TIME: 

This parameter should be set to the execution time of the longest 
pattern being run. for the default case this is 35 seconds for 
Pattern #33. 

ADDITIONAL RUN TIME: 

Not Used By Program. 



SEQ 0011 



SOFTWARE ENVIRONMENT: 

For APT auto mode this parameter should be set to a "1". 
dump mode set this to a "0". 



For 



ENVIRONMENT MODE; 

When this parameter is set to a "0" the program does it's own 
sizing. If the users sets bit #7 however, he must specify the types 
and amounts of memory to be tested. 

SWITCH 1: 

The default setting of this switch is "101". APT uses this as 
the switch register for the program. Reference section 2.4.1 for more 
information on switch settings. 

SWITCH 2: 

This switch, if set to any non-zero number, is used to limit the 
amount of passes APT will make. The program will hang after this 
count has been reached. 

CPU OPTIONS: 

Not Used By Program. 

MEMORY TYPE n (n=l to 4) 

If bit #7 of ENVIRONMENT MODE is set these four words are used to 
log the different types of memory to be tested. If bit #7 is not set 
these location are not used. 

MAXIMUM ADDRESS n (n=l to 4) 

These four words are used in conjuntion with the corresponding 
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500 
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510 
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51A 
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522 
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526 

527 
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MEMORY TYPE words to indicate the highest address that memory type 
occupies. 



NOTE 

The above two parameters do not actually 
have to represent an accurate 
configuration of memory. All the 
program looks for is an accurate tally 
of memory amount! 



INTERRUPT VECTOR n (n=l to 2) 

Not Used By Program. 

BUS PRIORITY n (n«l to 2) 

Not Used By Program. 

BASE ADDRESS: 

Not Used By Program. 

DEVICE MAP: 

Not Used By Program. 

CONTROLLER DESCRIPTOR CODE n (n-1 to 2) 

Not Used By Program. 

DEVICE DESCRIPTOR CODES: 

The Device Descriptor codes are used by the program to determine 
which patterns it will run. The default values of these words are all 
"l"'s, indicating that all of the patterns shown in section 2.2 are 
executed (save for exceptions as noted there). Each set of words 
controls a table in the program as follows: 



SEQ 0012 



DD WORDS PROGRAM TABLE (Symbolic location) 

Words 0-1 MKCSRT 
Words 2-3 MKPAT 
Words 4-5 MJPAT 

Bit #0 set in the first word indicates that the first pattern In the 
table will be executed, bit <M the second, bit C2 the third,... bit 
00 of the second word indicates that the 17th entry in the table will 
be executed, and so on. 



Nl 
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SEQ 0013 

529 
530 
531 
532 
533 
534 

535 2.3.3 No SBE Free Banks - 

536 

537 If the program cannot find any SBE (Single Bit Error) free locations 

530 (in non-protected ECC memory) it Mill print out an error message and 

539 continue testing by-passing the ECC logic tests. 

540 

541 

542 

543 2.3.4 Mixed Parity ECC Configurations - 

544 

545 The program will function normally in mixed environments. The 



546 
547 
548 



sequence of testing may seem strange due to the recursive test mode 
algorithm (reference sections 2.4.1.1, 2.4.1.2, 2.4.1.3). 
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2.4 Program Options 
2.4.1 Switch Register Details - 

If a hardware switch register is not available then the software 
switch register is in location 176. IF under APT if BIT7 is set in 
the E-TABLE symbolic location "lENVM" the APT software switch register 
will be used (location $SUREG). 

To change the software switch register contents: Type "control G". 
This will cause display the current value of the SUR and prompt for 
the octal input of the new SUR value from the terminal. This routine 
will ignore you (not respond to control "G") if you have a hardware 
switch register. 

SU15 ' HALT ON ERROR 
(100000) 

Continuino from this halt will first check for a chanoe 
in the sortware switch register ("Control G" in the TTY 
input buffer) then it will continue testing. 

SU14 « LOOP ON TEST 
(40000) 

This will cause looping on the present test or pattern 
(back to last scope trap). If in a pattern then the 
looping will be for an entire bank of 16K addresses. 

SU13 » INHIBIT ERROR TYPEOUTS 
(20000) 

This will cause returns from the error routine without 
the typed messages. Other on error functions are not 
affected. 

SU12 * INHIBIT RELOCATION 
(10000) 

This prevents the program from moving and consequently 
prevents the program from test'ng at least 32K of 
memory . 

sun * QUICK VERIFY 
(4000) 

If this switch is selected approximately one 64th of 
the possible combinations of SBE's DBE's are tested. 

Each pass complete typeout will indicate this mode by 
preceding the pass number with "QV'. 



SEQ 0014 



C2 
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SEQ 0015 



SUlO 



SU9 



SU8 



SU7 



SU6 



SU5 



click) on each error 



BELL ON ERROR 
(2000) 

This causes a bell (or beep or 
trap 

LOOP ON ERROR 
(1000) 

This Hill cause looping from failure point back to the 
last CO "ectly initialized area of the current test. 

HALT PROGRAM 
(400) 

This initiates the following sequence: 

1. If program lo relocated !t moves back to bank zero. 

2. Flush out all possible OBE's. 

3. Turns off Memory Management. 

4. Restore loaders. 

5. Unmap the Unibus Map (if there is one). 

6. Halt if under APT or ACT branch sel. 



DETAILED EK lOR REPORTS 
(200) 

After any normal error report is typed this option 
causes the contents of the following registers to be 
typed: 

RO. Rl, R2. R3, R4. R5. SP. "CONTROL". "CPUERR 

INHIBIT CONFIGURATION MAP 
(100) 

This inhibits the printing of a map showing the memory 
configuration - reference section 7.3 

LIMIT MAX ERRORS PER BANK 
(40) 

This will limit the number of error typeouts per bank. 
The default is 10. DECIMAL, however this can be 
changed by changing location "ERRMAX" manually. 
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SEQ 0016 

SU4 = FAT TERMINAL 

(20) 

This informs the program that the console terminal has 
a width of at least 132 columns CLA36 with wide paper). 

SW3-1 - TEST MODE 

Test modes determine the recursion algorithm to be used 
during pattern tests. 

MODE NAME DESCRIPTION 

Banks forward, patterns forward 
Banks forward, patterns reverse 
Banks worst first, patterns forward. 
Banks worst first, patterns reverse. 
Patterns forward, banks forward 
Patterns forward, banks worst first 
Patterns reverse, banks forward 
Patterns reverse, banks worst first. 

For more details reference section 2.4.1.1. 2.4.1.2 and 
2.4.1.3. 

SUO = DETECT SINGLE BIT ERRORS (SBE's) 

(1) 

For manufacturing purposes this switch should always be 
on. For field service purposes this switch should 
always be off. 

This switch will allow all ECC Single Bit errors to be 
reported by disabling error correction. 

Error printouts of SBE's are not distinguishable from 
DBE's. 



CO) 


0 


BAFPAF 


(2) 


1 


BAFPAR 


(4) 


2 


BAUPAF 


(6) 


3 


BAUPAR 


(10) 


4 


PAFBAF 


(12) 


5 


PAFBAU 


(14) 


6 


PARBAF 


(16) 


7 


PARBAU 



NOTE 

If Double Bit Errors are found in the memory, 
this switch should be set to make sure that new 
data can be written to the DBE locations. 



2.4.1.1 Test Mode Example - 

Example analysis of mode 5 "PAFBAU". Assume Banks 0 1 are MSVll-J 
and Banks 2.3.4. 5 are MSVll-L. 
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724 

725 

726 

727 

728 

729 

730 

731 

732 

733 

734 

735 

736 

737 

738 

739 

740 

741 

742 

743 

744 

745 

746 

747 

748 

749 

750 

751 

752 

753 

754 

755 

756 

757 

758 

759 

760 

761 

762 
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Assume also that Bank 3 is known bad by the program v a the s'zmg 
routine or previous runs The testing sequence would be as follows: 

sTEST MSVll-J MEMORY TYPES FIRST 
:TEST KNOWN BAD MEMORY (BANK 3) 



SEQ 0017 



TEST 17, 
TEST 7, 
TEST 
TEST 
TEST 
TEST 
TEST 21. 
TEST 20. 
TEST 22. 
TEST 26. 



1. 
2. 
4. 
5. 



BANK 
BANK 
BANK 
BANK 
BANK 
BANK 
BANK 
BANK 
BANK 
BANK 



sTEST PRESUMED GOOD MEMORY (BANKS 2.4.5) 



tf<;t 


1 7 


BANK 


2 


tf<;t 


7 


BANK 


2 


TEST 


1. 


BANK 


2 


TEST 


2. 


BANK 


2 


TEST 


4. 


BANK 


2 


TEST 


5. 


BANK 


2 


TEST 


21. 


BANK 


2 


TEST 


20. 


BANK 


2 


TEST 


22. 


BANK 


2 


TEST 


26. 


BANK 


2 


TEST 


17. 


BANK 


4 


TEST 


7. 


BANK 


4 


TEST 


1. 


BANK 


4 


TEST 


2. 


BANK 


4 


TEST 


4. 


BANK 


4 


TEST 


5. 


BANK 


4 


TEST 


21. 


BANK 


4 


TEST 


20. 


BANK 


4 


TEST 


22. 


BANK 


4 


TEST 


26. 


BANK 


4 


TEST 


17. 


BANK 


5 


TEST 


7. 


BANK 


5 


TEST 


1, 


BANK 


5 


TEST 


2. 


BANK 


5 


TEST 


4. 


BANK 


5 


TEST 


5. 


BANK 


5 


TEST 


21. 


BANK 


5 


TEST 


20. 


BANK 


5 


TEST 


22. 


BANK 


5 


TEST 


26. 


BANK 


5 



CVriJAAO MSVll J MEHORY DIAG. 



764 

765 

766 

767 

768 

769 

770 

771 

772 

773 

774 

775 

776 

777 

778 

779 

780 

781 

782 

783 

784 

785 

786 

787 

788 

789 

790 

791 

792 

793 

794 

795 

796 

797 

798 

799 

800 

801 

802 

803 

804 

805 

806 

807 

808 

809 

810 

811 

812 

813 

814 

815 
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; RELOCATE TEST PROGRAM SPACE (BANK 0 6 1) 



TEST 1. 
TEST 2. 
TEST 3. 
TEST 4. 
TEST 5. 
TEST 26. 
TEST 1 . 
TEST 2. 
TEST 3, 
TEST 4. 
TEST 5. 
TEST 26. 



BANK 
BANK 
BANK 
BANK 
BANK 
BANK 
BANK 
BANK 
BANK 
BANK 
BANK 
BANK 



NOTE 



This is an example 
sequence . 



not an actual 



The test sequence was forward (the simple patterns first, complex 
tests last) sequence of patterns (MSVll-L = 17. 7. 1, 2, 4, 5, 21. 
20. 22. 26)(MSV11-J = 1. 2. 3. 4. 5. 26). 



If the bank selection is forward the banks will 
following order: 



be tested in the 



1. ECC banks that are not protected or program space (from 0 to 

167). 

2. Parity banks that are not program space (from 0 to 167). 

3. The program now relocates tests: 

4. ECC banks that were protected or program space (from 0 to 
167). 

5. Parity banks that were program space (from 0 to 167). 

If bank selection is worst first the configuration table will be 
consulted and banks will be tested in the following order. 

1. ECC banks that are known bad and are not protected or program 
space (from 0 to 167). 

2. Parity banks that are known bad and are not program space 
(from 0 to 167). 

3. ECC banks that are presumed good and are not protected or 



SEQ 0018 



CVMJAAO MSVll-J MEMORY OIAG, 



817 

818 

819 

820 

821 

822 

823 

824 

825 

826 

827 

828 

829 

830 

831 

832 

833 

834 

835 

836 

837 

838 

839 

840 

841 

842 

843 

844 

845 

846 

847 

848 

849 

850 

851 

852 

853 

854 

855 

856 

857 

858 

859 

860 

861 

862 

863 

864 

865 

866 

867 

868 

869 

870 
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program space (from 0 to 167). 



5, 
6. 



8. 



2.4.1.2 
MODE 0 



MODE 1 



MODE 2 



MODE 3 



Parity banks that are presumed good and are not program space 
(from 0 to 167), 

The program noH relocates tests: 

ECC banks that are known bau and were protected or program 
space (from 0 to 167). 

Parity banks that are known bad and were program space (from 
0 to 167). 

ECC banks that are presumed good and were protected or 
program space (from 0 to 167). 

Parity banks that are presumed good and were program space 
(from 0 to 167), 



Test Mode Details - 

« "BAFPAF" banks forward, patterns fo ward 
This is the default and simplest mode. 



This mode tests each bank completely from 
except those requiring relocation*. 



to 167 



While testing each bank the patterns are run with the 

fii 



simple ones first building to the more complex 

"BAFPAR" > banks forward, patterns reverse 

This mode tests each bank completely from 0 
except those requiring relocation*. 



to 167 



Uhile testing each bank the patterns are run with the 
most complex ones first, working to the simple ones. 

* "BAUPAF" ■ Banks worst first, patterns forward 

This mode first tests each known bad bank completely 
from 0 to 167 except those requiring relocation*, then 
presumed good banks are tested from 0 to 167 except 
those requiring relocation*. 

Uhile testing each bank the patterns are run with the 
simple ones first, building to the more complex. 

= "BAUPAR" « Banks worst first, patterns reverse 

This mode first tests each known bad bank completely 



SEQ 0019 



CVMJAAO MSVn J MEMORY DIAG. 



872 

873 

874 

875 

876 

877 

878 

879 

880 

881 

882 

883 

884 

885 

886 

887 

888 

889 

890 

891 

892 

893 

894 

895 

896 

897 

898 

899 

900 

901 

902 

903 

904 

905 

906 

907 

908 

909 

910 

911 

912 

913 

914 

915 

916 

917 

918 

919 

920 

921 

922 

923 

924 
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SEQ 0020 



from 0 to 167 except those requiring relocation*, then 
presumed good banks are tested from 0 to 167 except 
those requiring relocation*. 

While testing each bank the oatterns are run with the 
most complex ones first, wo king to the simple ones. 

MODE 4 = "PAFBAF" « Patterns forward, banks forward 

This mode tests each pattern completely with the simple 
ones first, building to the more complex. 

Uhile testing each pattern the banks are run from 0 to 
167 except those requiring relocation*. 

MODE 5 = "PAFBAW" = Patterns forward, banks worst first 

This mode tests each pattern completely with the simple 
ones first, building to the more complex. 

Uhile testing each pattern first each known bad bank 
from 0 to 167 except those requiring relocation* is 
run, then presumed good banks are run from 0 to 167 
except those requiring relocation*. 

MODE 6 = "PARBAF" = Patterns Reverse. Banks Forward 

This mode tests each pattern completely with the most 
complex ones first, working to the simple ones. 

While testing each pattern the banks are run from 0 to 
167 except those requiring relocation*. 

MODE 7 = "PARBAU" ' Patterns Reverse. Banks Worst First 

This mode tests each pattern completely with the most 
complex ones first, working to the simple ones. 

While testing each pattern first each known bad bank 
from 0 to 167 except those that require relocation* is 
run. then presumed good banks are run from 0 to 167 
except those requiring relocation*. 

NOTE 

* Relocation is required to test the 
bank(s) in program space and also to 
test any ECC banks protected by 
diagnostic checkmode with the inhibit 
mode pointer off (zero)! 



CVMJAAO riSVll-J MEMORY 01 AG, 



926 

927 

926 

929 

930 

931 

532 

933 

934 

935 

936 

937 

938 

939 

940 

941 

942 

943 

944 

945 

946 

947 

948 

949 

950 

951 

952 

953 

954 

955 

956 

957 

958 

959 

960 

961 

962 

963 

964 

965 

966 
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SCO 0021 



2.4.1.3 Test Mode Applications - 

1. To verify correct operation of the memory system use Mode 0 

"BAFPAF ". 

Advantages: Easy to understand. 

Disadvantages: In case of a failing Bank, it may take a long 
time to find the failure. 

2. To get detailed error information on known bad Banks (found 
by sizing routine) use Mode 2 "BAUPAF". 

Advantages: Seeks Bad Banks. Easy to understand. 

Disadvantages: Failures other than zeros ones may take a 
long time to find. 

3. To get good error info on any memory problem fast use Mode 4 
"PAFBAF'^. 

Advantages: Covers all banks fast. Easy to understand. 

Disadvantages: Failures from only complex patterns may take 
a long time to find. 

4. To find any problem fast use Mode 7 "PARBAU". 
Advantages: Covers all Banks fast. 

Disadvantages: Difficult to understand failures reported are 
not necessarily the most basic failure modes. 



J2 
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SEQ 0022 



968 
969 
970 
971 
972 
973 
974 
975 
976 
977 
978 
979 
980 
981 
982 
983 
984 
985 
986 
987 
988 
989 
990 
991 
992 
993 
994 
995 
996 
997 
998 
999 
1000 
1001 
1002 
1003 
1004 
1005 
1006 
1007 
1008 
1009 
1010 
1011 
1012 
1013 
1014 
1015 
1016 
1017 
1018 
1019 
1020 
1021 
1022 
1023 



2.4.2 Software Switch register 

A software switch register exists in location 174. 

2.4.3 Special Memory Locations - 
2.4.3.1 CACHE Constant - 

The CACHE constant is located at symbolic location "CACHK" and is used 
to enable CACHE. 



NOTE 

Bit 0 in the CACHE constant has no 
effect since it is unconditionally set 
by the program whenever it tries to 
enable CACHE. 



2.4.3.2 Configuration Table 

The configuration table is located at symbolic location "CONFIG' 
has the following format: 

CONFIG: First 16K Configuration words (2 each) 
2nd 16K Configuration words (2 each) 



and 



200th 16K configuration words (2 each) 



Configuration Uords: 
LOU: 



MED; 



BIT 0 ERRORS PRESENT 

BIT 1 MEMORY EXISTS 

BIT 2-4 RESERVED 

BIT 5 SKIP ECC LOGIC TESTS FLAG (1=SKIP) 

BIT 6 PROTECTED REGION OF AN ECC MEMORY 

BIT 7 PROTECTED (PROGRAM SPACE) 

BIT 8-11 CSR CODE 

BIT 12-15 RESERVED 

BIT 0-7 NUMBER OF ERRORS 

BIT 8-10 MEMORY TYPE 

BIT 11 CSR TESTED OK 

BIT 12 RESERVED 

BIT 13 "BACKGROUND PATTERN VALID" FLAG 

BIT 14 BANK SELECTED FOR TEST BY FIELD SERVICE MODE 

BIT 15 LOADERS HOME BANK 



This table is used as the source for the configuration 
Map (reference, section 7.3). 



CVMJAAO MSVll-J MEriORY OIAG. 



1025 

1026 

1027 

1028 

1029 

1030 

1031 

1032 

1033 

1034 

1035 

1036 

1037 

1038 

1039 

1040 

1041 

1042 

1043 

1044 

1045 

1046 

1047 

1048 

1049 

1050 

1051 

1052 

1053 

1054 

1055 

1056 

1057 

1058 

1059 

1060 

1061 

1062 

1063 

1064 

1065 

1066 

1067 

1068 

1069 

1070 

1071 

1072 

1073 

1074 

1075 

1076 

1077 

1078 
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SEQ 0023 



2.4.4 Terminal Commands 



2.4.4.1 Control "C" 
This command will: 

1. If Switch 8 (Halt Program) in the switch register is set halt 
the program. 

2. If Switch 8 is not set, unrelocate if program was relocated. 

3. Flush out any DBE's. 

4. Turn off Memory Management. 

5. HALT 



This command will only be recognized at the completion of the current 
test or pattern, or at the end of a line of an error message. 



2.4.4.2 Control "K" (Kill error printout and skip pattern) 

This command will allow you to stop an error printout and skip to the 
next pattern. This is handy, for example, when you have a whole bank 
full of errors, have gotten enough information, and wish to skip to 
the next pattern. 



2.4.4.3 Control "T" (Tell me what's happening) 

This command will print out the information encoded in the display 
register. This is mainly intended for CPU's without a hardware 
display register. 

Example: 

BANK = 17 TEST = 46 
RELOCATED BANK- 0 PAT= 26 



By use of Field Service Command 17 "Trace" can be set so that it will 
automatically type out the bank and pattern number*- as each pattern is 
run. (Reference section 2.4.4.8.18). 



CVMJAAO MSVll-J MEMORY 01 AG. 
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SEQ 0024 



1080 
1081 
1082 
1083 
1084 
1085 
1086 
1087 
1088 
1089 
1090 
1091 
1092 
1093 
1094 
1095 
1096 
1097 
1098 
1099 
1100 
1101 
1102 
1103 
1104 
1105 
1106 
1107 
1108 
1109 
1110 

nil 

1112 
1113 
1114 
1115 
1116 
1117 
Ilia 
1119 
1120 
1121 
1122 
1123 
1124 



2.4.4.4 Control "S" (Stop) 

This command will stop typeout (soon) and will wait for a Control "Q". 

2.4.4.5 Control "Q" (Quintinue) 

This command will continue typing that has been stopped by Control 
"S". If there has been no Control "S" typed then this command s 
ignored. 

2.4.4.6 Control "F" (Field Service mode) 

This command will cause you to enter a mode which looks for sub 
commands . 

When the program is looking for a sub command any number that is not a 
legal command will cause a mini help message to be typed. Therefore 
when in doubt type 99 (CR) and you will get help. 

NOTE 

Typing just carriage return is a default 
command 0. 



2.4.4.7.1 Field Service Command 0 (Exit) 

This command will exit Field Services Mode and return to whatever task 
it was in prior to typing control "F". Note typing just carriage 
return is a default Command 0. 



CVMJAAO MSVll-J MEMORY OIAG. 
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SEQ 0025 



1126 
1127 
1128 
1129 
1130 
1131 
1132 
1133 
1134 
1135 
1136 
1137 
1138 
1139 
1140 
1141 
1142 
1143 
1144 
1145 
1146 
1147 
1148 
1149 
1150 
1151 
1152 
1153 
1154 
1155 
1156 
1157 
1158 
1159 
1160 
1161 
1162 
1163 
1164 
1165 
1166 
1167 
1168 
1169 
1170 
1171 
1172 
1173 
1174 
1175 



2.4.4.7.2 Field Service Conmand 1 (Read CSR) 
This command will typeout the contents of the CSR. 

If there is more than one CSR on the CPU (or if the P^09'"»«?„,5?»f ^ "O* 
determined the CSR status yet), it will Ask you^"UHICH CSR(O-F)" to 
which you must respond with an Hex i decimal number from 0 to F. Note 
typing just carriage return is a default 0. 

If the CSR you select causes a trap to 4 the program will type "THIS 
CSR DOES NOT EXIST". 



NOTE 

CSR references are done 
with section 5.0. 



i n accordance 



2.4.4.7.3 Field Service Command 2 (Load CSR) 
This command will enable you to load the CSR. 

If there is more than one CSR on the CPU (or if the program has not 
yet determined the CSR status yet) it will asW you "WHICH CSR(O-F)'' to 
which you must respond with an Hex i decimal number from 0 to F, Note 
typing just carriage return is a default 0. 

If the CSR you select causes a trap to 4 the program will type "THIS 
CSR DOES NOT EXIST". 

The CSR will be read and displayed as in command 1. 

The program will then ask you for the "CSR?" to which you must respond 
with an Octal number. Note typing just carriage return is a default 
0. 

The program will then load the CSR and Read it again displaying its 
new contents. 



I 
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1177 

1178 

1179 

1180 

1181 

1182 

1183 

1184 

1185 

1186 

1187 

1188 

1189 

1190 

1191 

1192 

1193 

1194 

1195 

1196 

1197 

119S 

1199 

1200 

1201 

1202 

1203 

1204 

1205 

1206 

1207 

1208 

1209 

1210 

1211 

1212 

1213 

1214 

1215 

1216 

1217 

1218 

1219 

1220 

1221 

1222 

1223 

1224 

1225 

1226 

1227 
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SEa 0026 



2.4.4.7 4 Field Service Command 3 (Examine Memory) 

This command will alloM you to examine any physical address and does 
the necessary memory lanagement mapping for you. 

The program will ask you for the "PHYSICAL ADDRESS (0-17757776)" to 
which you must respond with an Octal number. 

If the address access causes a trap to 4 the program will type 
"TIMEOUT TRAP". If the address access causes a trap to 114 the 
program will type "PARITY ABORT". 

The cc^tents of your physical address will be typed. 
2.4.4." 5 Field Service Command 4 (Modify Memory) 

This command allows you to modify any physical address and does the 
necessary memory management mapping ror you. 

The program will ask you for the "PHYSICAL ADDRESS (0-17757776)" to 
which you must respond with an Octal number. 

If the address access causes a trap to 4 the program will type 
"TIMEOUT TRAP". If the address access causes a trap to 114 the 
program will type "PARIT^ ABORT". 

The program will type "OLD DATA WAS" and the contents of your physical 
address . 

The program will then type "INPUT NEW DATA" to which you must respond 
with an Octal number. Note typing just carriage return is a default 
0. 



The program will attempt to write this new data into your physi 
address after which it will read it again and type "DATA IS NOW" 
the new contents of your physical address. 



NOTE 

If you can't change the data, that would 
indicate that you have a Double Bit 
Error in titat double word pair. 



cal 
and 



cvHjAAo nsvii-j mnoRt diag. 



1229 

1230 

1231 

1232 

1233 

1234 

1235 

1236 

1237 

1238 

1239 

1240 

1241 

1242 

4243 

1244 

1245 

1246 

1247 

1248 

1249 

1250 

1251 

125? 

1253 

1254 

1255 

1256 

1257 

1258 

1259 

1260 

1261 

1262 

1263 

1264 

1265 

1266 

1267 

1268 

1269 

1270 

1271 

1272 

1?73 

1274 

1275 

1276 

1277 

1278 
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2.4.4.7.6 Fi«ld Service Command 5 (Select Bank Test) 

Th^s command allows you to run any bank with any pattern forever. 

The program will ask you "BANK(0-177)" to whicK you must respond with 
an Octal number. If the bank is not accessible. The program will 
type "BANK NOT ACCESSIBLE" and ask question over. 

The program will then ask "TEST (0-47)" to which you must respond 
with an Octal number. 



NOTE 

Any pattern can be run including those 
that are not part of the APT E- TABLE 
defaults (reference section 6.2.1). If 
you select Pattern 0, the program w'll 
ask "TEST 0 DATA IS?" to which you 
must respond with an Octal number. 



If the Bank you selected requires relocation the program will type 
"BANK REQUIRES RELOCATION" and exit this command. Note normally this 
is true for Bank 0. 

The program will then arm the console keyboard for interrupts and type 
"TO ESCAPE TYPE ANY KEY!". 



The test pattern will be entered and run until 
depressed to escape this loop. 



a console key is 



2.4.4.7.7 Field Service Command 6 (Type Configuration Map) 
This command types the configuration map. 

This is useful after a lon^ run (overnight) to see all the banks that 
are marked as bad. (Especially if your console is a video terminal). 

For a detailed explanation of the map reference section 7.3. 



SEQ 0027 
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SEQ 0028 



1280 
1281 
1282 
1283 
1284 
1285 
1286 
1287 
1288 
1289 
1290 
1291 
1292 
1293 
1294 
1295 
1296 
1297 
1298 
1299 
1300 
1301 
1302 
1303 
1304 
1305 
1306 
1307 
1308 
1309 
1310 
1311 
1312 
1313 
1314 
1315 
1316 
1317 
1318 
1319 
1320 
1321 
1322 
1323 
1324 
1325 
1326 
1327 
1328 
1329 
1330 
1331 
1332 



2.4.4.7.8 Field Service Command 7 (SOB-A-LONG TEST) 

This command allows execution of the SOB-A-LONG Test jn all 
non-protected Banks reference Section 6.2.2.26. Operation is 
identical to command 5 except that no Pattern or Bank is entered and 
each pass causes a Bell. 

2.4.4.7.9 Field Service Command 8 (Error Summary) 

This command types out the number of passes and the total number of 
errors. If there were any errors it will type out the Banks and the 
number of errors per bank up to 255 DECIMAL. 

This becomes useful after long runs (all night) on systems with a 
video console terminal. 



2.4.4.7.10 Field Service Command 9 (Refresh TEST) 

This command allows execution of the Refresh Test on all non-protected 
Banks reference Section 6.2.2.19. Operation is identical to command 5 
except that no Pattern or Bank is entered and each pass causes a Bell. 



2.4.4.7.11 Field Service Command 10 (Set Fill Count) 

This command allows setting of the terminal fill count (necessary for 
LA30's. ASR33's, and VTOS's). It is normally set to zero for LA36's, 
VT52's. VTlOO's. etc. 



2.4.4.7.12 Field Service Command 11 (Enter Kamikaze Mode) 

This command allows you to run patterns that are normally not executed 
unless under APT or ACT. They are usually very time consuming and can 
result in failures that are fatal to the program. In effect you are 
trying to find a hardware failure regardless of the consequences. 
Note that most crashes do not wipe out the display information which 
"s telling you what the program was doing just prior to failure. 
There are two ways to die here Impatience and Crashes. 
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1334 

1335 

1336 

1337 

1338 

1339 

1340 

1341 

1342 

1343 

1344 

1345 

1346 

1347 

1348 

1349 

1350 

1351 

1352 

1353 

1354 

1355 

1356 

1357 

1358 

1359 

1360 

1361 

1362 

1363 

1364 

1365 

1366 

1367 

1368 

1369 

1370 

1371 

1372 

1373 

1374 

1375 

1376 

1377 

1378 

1379 

1380 

1381 

1382 

1383 

1384 

1385 

1386 

1387 

1388 

1389 
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SEQ 0029 



2.4.4.7.13 Field Service Command 12 (Exit Kamikaze Mode) 
Return to the default mode of testing (undo Command 12). 

2.4.4.7.14 Field Service Command 13 (Turn Cache Off) 

This changes the Cache constant to bypass cache (reference section 
2.4.3.1). 



2.4.4.8.15 Field Service Command 14 (Turn Cache On) 

This changes the Cache constant to use cache (reference section 
2.4.3.1). 



2.4.4.7.16 Field Service Command 15 (Test Only Selected Banks) 

This command allows you to center the test effort on only those banks 
that you are troubleshootino. You may also test banks that require 
relocation and were inaccessable via command 5. 



2.4.4.7.17 Field Service Command 16 (Resume Testing All Banks) 
Return to the default mode of testing (undo Command IS). 

2.4.4.7.18 Field Service Command 17 (Resume Testing All Banks) 

Enable "Trace". After exiting field service mode, the program will 
type out the bank and pattern numbers as each pattern is run. 

2.4.4.7.19 Field Service Command 18 (Resume Testing All Banks) 
Disable "Trace", (undo Command 17). 
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1391 

1392 

1393 

1394 

1395 

1396 

1397 

1398 

1399 

1400 

1401 

1402 

1403 

1404 

1405 

1406 

1407 

1408 

1409 

1410 

1411 

1412 

1413 

1414 

1415 

1416 

1417 

1418 

1419 

1420 

1421 

1422 

1423 

1424 

1425 

1426 

1427 

1428 

1429 

1430 

1431 

1432 

1433 

1434 

1435 

1436 

1437 

1438 

1439 



2.5 Execution Times 
2.5.1 Typical (System) - 

Execution time depends on many variables; 
measured times on an 11/23B: 



K words of MSVll-J Memory 
Normal Pass Min Sec 

Quick Verify Min Sec 

Kamikaze Mode Mm Sec 
Kamikaze QV Min Sec 

K words of MSVll-L Memory 
Normal Pass Min Sec 

Quick Verify Min Sec 

Kamikaze Mode Min Sec 

Kamikaze QV Min Sec 

K words of MSVll-P Memory 
Normal Pass Min Sec 

Quick Verify Min Sec 

Kamikaze Mode Min Sec 

Kamikaze QV Min Sec 



2.5.2 Calculations (System) 



however here are some 



Normal Pass 
Add 
Add 
Add 

Quick Verify Pass 
Add 
Add 
Add 



Sec per 16K BANK of MSVll-P 
Sec per 16K BANK of MSVll-L 
Sec per 64K BANK of MSVll-J 



Sec per 16K BANK of MSVll P 
Sec per 16K BANK of MSVll-L 
Sec per 64K BANK of MSVll-J 



Kamikaze Mode 

Add 10 min. per 128K words for approximate pass times. 



SEQ 0030 

I 



cvnjAAO Hsvn j memory oiag. 
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SEQ 0031 



1441 

1442 

1443 

1444 

1445 

1446 

1447 

1448 

1449 

1450 

1451 

1452 

1453 

1454 

1455 

1456 

1457 

1458 

1459 

1460 

1461 

1462 

1463 

1464 

1465 

1466 

1467 

1468 

1469 

1470 

1471 

1472 

1473 

1474 

1475 

1476 

1477 

1478 

1479 

1480 

1481 

1482 

1483 

1484 

1485 



2.5.3 Typical (Tests) 
Test Time 



Description 



MTOODO 


<1 


SEC 


DATA PATTERN TEST 


MTOOOl 


<1 


SEC 


ADDRESS TEST 


MT0002 


;<1 


SEC 


COMPLEMENT ADDRESS TEST 


MT0003 


1 


SEC 


3 XOR 9 WORST CASE NOISE TEST 


HT0004 


, 1 


SEC 


ROTATING ZEROS TEST 


MT0005 


1 


SEC 


ROTATING ONES TEST 


MT0006 


<1 


SEC 


INITIAL DATA TEST 


MT0007 


,<1 


SEC 


ADDRESS BIT TEST 


MTOOlO 


<1 


SEC 


BYTE ADDRESSING TEST 


MT0014 


1 


SEC 


BASIC DOUBLE BIT ERROR TEST 


MT0017 


: <1 


SEC 


HOLDING I'S O'S TEST 


MT0020 


J 1 


SEC 


SYNDROMES TO CSR ON SINGLE BIT ERROR TEST 


MT0021 


; 1 


SEC 


MARCHING O'S I'S TEST 


MT0022 


10 


SEC 


REFRESH TEST 


MT0023 


10 


SEC 


SHIFTING DIAGONAL TEST 


MT0024 


20 


SEC 


FAST GALLOPING PATTERN TEST 


MT0026 


i<l 


SEC 


RANDOM DATA TEST 


MT0027 


i 1 


SEC 


UNIQUE BANK TEST 


MT0030 


! 1 


SEC 


FLUSH OUT DBE'S TEST 


MT0031 


i 3 


SEC 


SOB -A -LONG TEST 


MT0032 


<1 


SEC 


WRITE RECOVERY TEST 


MT0033 


35 


SEC 


BRANCH GOBBLE TEST 


MT0034 


<1 


SEC 


SOFT ERROR TEST 


MTC035 


,<1 


SEC 


WORST CASE PARITY TEST 


MT0036 


1 


SEC 


CORRECTION CODE TEST 


MT0037 


<1 


SEC 


CHECK ECC DISABLE TEST 


MT0041 


1 


SEC 


ADDRESS TO CSR ON OBC TEST 


MT0042 


<1 


SEC 


EXTENDED ADDRESS TO CSR ON ERROR TEST 


MT0043 


<1 


SEC 


WRITE BYTE TEST 


MT0044 


5 


SEC 


SHIFTING CHECKBITS THROUGH CSR TEST 


MT0045 


<1 


SEC 


SYNDROME BITS TO THE CSR ON A DBE TEST 


MT0046 


1 


SEC 


CHECK SINGLE BIT ERRORS WITH ECC DISABLED TEST 


MT0047 


<1 


SEC 


NO CSR UPDATE WITH EXISTING OBE TEST 
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1487 

1488 

1489 

1490 

1491 

1492 

1493 

1494 

1495 

1496 

1497 

1498 

1499 

1500 

1501 

1502 

1503 

1504 

1505 

1506 

1507 

1508 

1509 

1510 

1511 

1512 

1513 

1514 

1515 

1516 

1517 

1518 

1519 

1520 

1521 

1522 

1523 

1524 

1525 

1526 

1527 

1528 

1529 

1530 

1531 

1532 
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3.0 ERROR INFORMATION 

3.1 Error Reporting 

Most errors are reported using the EMT trap and handler prov ded by 
SYSMAC.SML. Most errors will be of the "MEMORY DATA ERROR" type which 
Mill be described here. MEMORY DATA ERRORS w'll also cause the bank 
to be marked as Bad in the configuration table. 

Other errors are best explained by referencing the specific typeout 
and if necessary the program listing. 



Example 1: 
MEMORY DATA ERROR 
PC BANK VADD 



PADD 



GOOD 



BAD 



XOR CSR MTYP PAT 



022132 37 060006 03700006 000000 000100 000100 0 E 06 

022132 37 060006 03700006 000000 000100 000100 0 E 06 

022132 37 060006 03700006 000000 000100 000100 0 E 06 

022132 37 060006 03700006 000000 000100 000100 0 E 06 

Uhile testing Bank 37 at virtual address 60006 (virtual addresses are 
always between 60000 and 157776 for mapping purposes), physical 
address 3700006 (that's Bank 37 physical 6 within the Bank) with 
Pattern 6 (Initial Data Test), the good data expected was 0 but the 
data actually read (BAD) was 100. the exclusive OR at Good Bad 
yields 100 which indicates only failing bit(s) (Bit 6). It is an 
MSVll-J (ECC) Memory. The CSR is located at 172000. 

Example 2: 
MEMORY DATA ERROR 

PC BANK VADO PADD GOOD BAD XOR CSR MTYP PAT 

022132 35 060000 03500000 000000 000001 000001 0 E 06 

022132 35 060002 03500002 000000 000100 000100 0 E 06 

022132 35 060006 03500006 000000 000100 000100 0 E 06 

Uhile testing Bank 35, virtual address 60000, physical address 3500000 
with Pattern 6 (Initial Data Test), the good data expected was 0 but 



SEQ 0032 



the data actually read (BAD) was 1. the exclusive OR 
yields 1 which indicates only failing bit(s) (Bit 0). 
(ECC) Memory and the CSR is located at 172000. 



at Good Bad 
It is an MSVll- 



NOTE 

Subsequent errors of the 
not type a new heading. 



same test do 
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1534 

1535 

1536 

1537 

1538 

1539 

1540 

1541 

1542 

1543 

1544 

1545 

1546 

1547 

1548 

1549 

1550 

1551 

1552 

1553 

1554 

1555 

1556 

1557 

1558 

1559 

1560 

1561 

1562 

1563 

1564 

1565 

1566 

1567 

1568 

1569 

1570 

1571 

1572 

1573 

1574 

1575 

1576 

1577 

1578 

1579 

1580 

1581 

1582 
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SEQ 0033 



3.2 Error Abbreviations 

The following is a list of all abbreviations used in error reports. 

* OF ERRORS Number of Errors that were detected. 

1ST ADO First Address that failed. 

ARRAY The array number that was locked up in the MSll-M CSR. 

APT# The 9 of CPU's APT expects on the system. 

APTCORE APT Core size. 

APTH'iS APT MOS size. 

BAD Bad date. 

BAO-UOl Bad Uord #1 of a double Hord data value. 

BAD-UD2 Bad Uord #2 of a double Hord data value. 

BAO-CHK Bad Check Code Bits. 

BANK The Bank number. Banks are 16K words long. 

BD-CC Bad Check Code Bits. 

CHKBITS The 7 bit value of the Check Code Bits. 

CONTRL The CACHE Control register. 

CPUERR CPU Error register. 

CSR Control and Status Register. 

CSRNO CSR NUMBER (0-F Hex! decimal). 

OATARG The CACHE Data Reoister. 

DBE Double Bit Error (uncorrectable error). 

DEV ADD Device Address. 

ECC Error Correctable Code. 

GD-CC Good Check Code Bits. 

GD-CHK Good Check Code Bits. 

GO-UDl Good Uord 4>1 of a double word data value. 

GD UD2 Good Uord 02 of a double word data value. 

GOOD Good data. 

LSIZE MSVll-J Size. 

MEMERR Memory Error register. 

HMRO Memory Management Register #0. 

HMRl Memory Management Register <^1. 

MMR2 Memory Management Register <^2. 

MMR3 Memory Management Register <^3. 

MTYP Memory Type CMSVll- J.MSVll-L . or MSVll-P). 

PAOD Physical Address (asserted by the program after mapping). 

PAT Pattern number. 

PC Program Counter at the time the error occurred. 

SBE Single Bit Error (correctable error). 

VADD Virtual Address (asserted by the program before mapping). 

UROTEl The data that was written into the 1st half of a double word. 

UR0TE2 The data that was written into the 2nd half of a double word. 

XOR Exclusive OR of the good and bad data. Shows the bad bits. 

AUT Address under test 
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1554 
1585 

1586 3.3 Error Halts 

1587 

1588 There are several Halts m the program. 

1589 

1590 All unused trap vectors contain a trap catcher (.WORD .♦2,HALT). 

1591 

1592 An undefined TRAP instruction halts at symbolic location "iHALTS". 

1593 

1594 The APT down load sequence will halt at symbolic location "APTHLT". 

1595 

1596 Halt on Error option (SW15 Set) at symbolic location "»HALT". 

1597 

1598 Halt program (SU8 Set) at symbolic location "$EXHALT". 

1599 

1600 Power Fail will normally halt at the end of the shut down sequence 

1601 (symbolic location "$DOUN"). 
1602 

1603 Power Fail has a fatal Halt at symbolic location "JILLUP" which can be 

1604 caused by power up occurring before power down sequence completed or 

1605 by power down before a power up sequence is completed. 
1606 

1607 



SEO 0034 
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1609 

1610 

1611 

1612 

1613 

1614 

1615 

1616 

1617 

1610 

1619 

1620 

1621 

1622 

1623 

1624 

1625 

1626 

1627 

1620 

1629 

1630 

1631 

1632 

1633 

1634 

1635 

1636 

1637 

1638 

1639 

1640 

1641 

1642 

1643 

1644 

1645 

1646 

1647 

1648 

1649 

1650 

1651 

1652 

1653 

1654 

1655 

1656 

1657 

1658 

1659 

1660 
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4.0 PROGRESS REPORTS 

Pass complete typeouts as follows: 



SEQ 0035 



END PASS 
END PASS 
END PASS 



0 
1 
2 



NOTE 

Pass 2 Mas flagged as a Quick Verify 
Pass. (Because of a change in SU5) 



To obtain progress reports Hhile executing, typing a Control "T" will 
print out the information encoded in the display register. 
Example : 

BANK" 2 TEST= 34 
Reference Section 2.4.4.7,18 for more information on Tracing. 

5.0 CSR INFORMATION TABLES 

The following is a picture view of the current control status 
registers which can be tested by this program. It shows bit 
assignments and definitions to provide e handy reference, and 
shows the similarities and differences between each one: 

NOTE 

All unused bits in each CSR are equal to zero. 



I 
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SEQ 0036 



1662 

1663 

1664 

1665 

1666 

1667 

1666 

1669 

1670 

1671 

1672 

1673 

1674 

1675 

1676 

1677 

1678 

1679 

1680 

1681 

1682 

1683 

1684 

1685 

1686 

1687 

1688 

1689 

1690 

1691 

1692 

1693 

1694 

1695 

1696 

1697 

1698 

1699 

1700 

1701 

1702 

1703 

1704 

1705 

1706 

1707 

1708 

1709 

1710 

1711 

1712 

1713 

1714 

1715 



5.1 MSVll-J CSR 



(I) 


I I I I ] 

IDE! lEA! . 
I I I I ] 


[ I I I I I ] 

ADDRESS 
[ I I I I I ] 


[ I I I I I I 
!SE I IP! DC! EC! EE! 
[ I I I I I I 




15 14 13 12 


11 10 09 08 07 06 


05 04 03 02 01 00 


(II) 


I I I I ] 
IDEIEAISI! 
I I I I ] 


[ I I I I I ] 

CHECK BITS 
[ I I I I I ] 


[ I I I I I I 
!SE!IP!DC!EC!EE! 
[ I I I I I I 




15 14 13 12 


11 10 09 08 07 06 


05 04 03 02 01 00 


(III) 


I I I I ] 
!DE!EA!SI! 
I I I I ] 


[ I I I I I ] 

SYNDROMES 
[ I I I I I ] 


[ I I I I I I 
!SE!IP!DC!EC!EE! 
[ I I I I I I 



15 14 13 12 11 10 09 08 07 06 05 04 03 02 01 00 



Bit assignments are defined 
as follows: 

BIT15 UNCORRECTABLE ERROR 
On a read to memory (ECC Disable 
Bit = 0). this bit is set if 
a double error occurs. The 
error address is stored in the 
CSR. Setting this bit also 
turns on a red LED at the rear of 
the card for a visual indication. 
This bit is also set in ECC 
Disable Mode if a SERR or DERR 
occurs . 

BIT14 EUB ERROR ADDRESS 

Uith Bit 14 > 1, a read to the CSR 

will fetch address A21 

through A18. Uhen Bit 14 ' 1. 

diagnostic data may not be 

loaded into the syndrome 

register. 



CVMJAAO nSVll-J MEnORY 01 AG. 
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SEQ 0037 



1717 

1718 

1719 

1720 

1721 

1722 

1723 

1724 

1725 

1726 

1727 

1728 

1729 

1730 

1731 

1732 

1733 

1734 

1735 

1736 

1737 

1738 

1739 

1740 

1741 

1742 

1743 

1744 

1745 

1746 

1747 

1748 

1749 

1750 

1751 

1752 

1753 

1754 

1755 

1756 

1757 

1758 

1759 

1760 

1761 

1762 

1763 

1764 

1765 

1766 

1767 

1768 

1769 

1770 



BIT13 SET INHIBIT MODE 
When this bit is set to 
a ''1", it enables the inhibit 
mode pointer to inhibit 
either the first or second 
16K from ever ooina into the 
Diag Check or ECC Disable 
Mode. 

BITS05-10 CHECK BIT STORAGE (CSR II) 
Check Bit Storage (Oiag CK 
Bit 2 ' 1) 

Uhen in the diagnostic check 
mode these bits are used to store 
the check bits to be written 
into memory or the check bits 
read from memory. If a double 
error or single error occurs 
when in the diagnostic check 
mode and ECC disable Bit 1 = 0, 
then the check bits are stored 
in the CSR together with 
the double or single error 
bit. These bits are writ^able 
in diagnostic mode. A "1" 
is stored in Bit 11 if CSR 
02, CSR 13, and CSR 14 are 
set to indicate that the 
memory under test is a MSVll-J. 

BITS05 11 Q6US ADDRESS STORAGE (CSR I) 
(Diag Ck Bits 2-0. ECC 
Disable Bit 1 ' 0) 

If a double or single error 
occurs on a Read cycle, then 
address Bits All through 
A17 are stored in these bits 
These bits are read only on 
the condition that SERR (CSR 4) 
or DERR (CSR 15) is set but 
CSR 14 is not set. 

EQB Address Storage (Oiag Ck 
B\t 2 - 0), ECC Disable Bit 

I = 0 or 1). 

If a double or single error 
occurs on a Read cycle, 
address Bits A17 throuoh 
All are stored in CSR Sits 

II through 5 and address 
Bits A21 through A18 are 
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177P 
1773 
1774 
1775 
1776 
1777 
1778 
1779 
1780 
1781 
1782 
1783 
1784 
1785 
1786 
1787 
1788 
1789 
1790 
1791 
1792 
1793 
1794 
1795 
1796 
1797 
1798 
1799 
1800 
1801 
180? 
1803 
1804 
1605 
1806 
1807 
1808 
1809 
1810 
1811 
1812 
1813 
1814 
1815 
1816 
1817 
1818 
1819 
1820 
1821 
1822 
1823 
1824 
1825 



SEQ 0036 



stored in a backup register. 
The EQB Error Address 
Retrieval Bit (CSR 14) is 
used to obtain the total 
error address as follows: 

Uith CSR Bit 14 > 0 a read to 
the CSR will obtain Al? 
through All from CSR Bits 11 
through 5. 

CSR Bit 14 can then be set 
to a "1" and a read to the 
CSR will then read A21 
through A18 from CSR Bits 8 
through 5 and O's from CSR 
Bits 11 through 9. 

Address Bits A21 through 
All arc obtained 
to locate the double 
error to a IK segment of 
memory . 

The EQB address A21 
through A18 is read only 
whenever CSR 14 * 1. 

BIT05-10 SYNDROME STORAGE (CSR III) 

If a double or single error 

occurs on a read or wr i te 

byte cycle, and if CSR bit 

2 is set to a "0" syndrome 

Bits X, 0. 1. 2. 4 and 8 

and stored in CSR bits 5 

through 10. To read the 

syndrome bits from CSR, Bit 

you must read the error 

address, then set 2 of 

the CSR must be st to 

a "1" (diagnostic mode) and 

the CSR read again. This operat'on 

will allow syndrome bits 

for a single or double 

failure to be read instead 

of the address bits normally 

read when CSR 02 is set to "0". 

BIT04 SINGLE ERROR 

If on a read to memory a 

SBE occurs, the errrt»* 

address A<;l-All and 

the 'irror syr dromes will 
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1827 
1528 
1829 
1830 
1831 
1832 
1833 
1834 
1835 
1836 
1837 
1838 
18S9 
1840 
1841 
1842 
1843 
1844 
1845 
1846 
1847 
1848 
1849 
1850 
1851 
1852 
1853 
1854 
1855 
1856 
1857 
1858 
1859 
1860 
1861 
1862 
1863 
1864 
1865 
1866 
1867 
1868 
1869 
1870 
1871 
1872 
1873 
1874 
1875 
1876 
1877 
1878 
1879 



I 



be logged m CSR Bits 5 11 
unless the uncorrectable error 
CSR 15 IS set. The error 
address Mill be logged 
unconditionally in the ECC 
Disable Mode. This bit is not 
set if Inhibit Mode (Bit 
13 ■ 1) is set and Diagnostic 
Mode (Bit 02 * 1) is set. 

BIT03 INHIBIT MODE POINTER 
This bit Morks in conjunction 
Nith the Set Inhibit Hodc 
(Bit 13). When Bit 13 is set 
to a 1. a 16K portion of 
memory is inhibited from 
operatino in the ECC Disable 
Mode or Diagnostic Check Mode. 

The Inhibit Mode Pointer 
indicates which 16K is being 
inhibited, i.e.. Bit 3 - 0 
the first 16K of memory is 
inhibited, Bit 3-1. the 
second 16K of memory is 
inhibited. 

With Bit 13 set to, a 0. Bit 
3 becomes inoperative. 

Bit03, in conjunction with 
Bit 13. therefore allows a 16K 
chunk of memory to always have 
ECC coverage. The systems 
diagnostic can therefore 
reside in this protected 
po'iion of memory and can 
disable ECC and/or run the 
Diagnostic Check Mode in the 
rest of memory without itself 
becoming vulnerable to single 
errors. This bit is a R«aa/Urit« 
bit reset by power up and BUS 
INIT. 

BIT02 Diagnostic Check Mode 
This mode allows a means of 
forcing a single or double 
error m a desired location. 
It also provides a means of 
examining the check bits and 
the syndrome in a givan 
location. 
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1 

SEQ 0040 



1681 
1S82 



1884 
1885 
1886 



1888 
1889 
1890 



1895 



1907 
1908 
1909 
1910 
1911 
1912 
1913 
1914 
1915 
1916 



191S 
1919 
1920 
1921 
1922 
1923 



1925 
1926 



The check bits desired for a 



taat given data pattern are written 

Into Bits 5 through 11 of 
the CSR. A »«ord or write byte 



memory will write the check bits 



tmin from the CSR to the MOS array 



(CSR 2 - 1) instead of the check 
bits generated on the data 
to be written. Single errors 



iZoi on the read portion of the OATOB 

cycle are corrected. 

1893 

A read to the memory will 



read the check bits stored In 



l^^ff memory and clock them into 

jQ^y the CSR. 
1898 

••oo If a double error or single 

Tooo error occurs the OERR or 

JoqY SERR bit in the CSR is set 

ignp and the error syndrome bits 

ion* read from ECC are stored In 

^XqI CSR Bits 10-5 as well as the 

iqQm address bits. In Diagnostic 

iolS. Check Mode the error syndrome 



bits will be read when CSR 
Bits 10-5 are read. 

This bit is a Read/Urite bit 
and is reset on power up and 

BUS INIT 



BITOl DISABLE CORRECTION MODE 
If this bit is set. no single 
errors will be corrected. A 



• n<7 errors tvixx ^ui rcb«.cu. 

iliL single error will set CSR 4 



and CSR 15 or a double error 
will set CSR 15 and assert 
BUS PBL if CSR 00 is asserted. 
The IK block of address where 
the error occurs will also 
be stored in the CSR. The 



ilxi priority of a SERR and OERR 



will be the same. i.e.. the 



7o37 last error information will 

to3« always be stored unless a DERR 



1929 
1930 

}n«3 tne cycie wixi noi aw> i.« 

J^jj The check bits written will 



precedes a SERR. If a double 
error occurs during a write byte 
cycle, the write portion of 
the cycle will not be aborted. 
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1935 

1936 

1937 

1938 

1939 

1940 

1941 

1942 

1943 

1944 

1945 

1946 

1947 

1948 

1949 

1950 

1951 

1952 

1953 

1954 

1955 

1956 

1957 

1958 



SEQ 0041 



have been generated on the 
data written. This means that 
if a single or double error 
existed m the location accessed, 
it Mould be cleared (unless the 
errors were hard). 

This bit is a diagnostic aid 
to alloM writing and reading 
data from memory without 
interference from the error 
correction logic. 

BITOO UNCORRECTABLE ERROR 
INDICATION ENABLE 
If a double error occurs with 
ECC enabled or a single error 
or double error with ECC 
disabled, on a Read cycle to the 
memory and this bit is set. 
then BUS P6L will be asserted. 
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1960 

1961 

1962 

1963 

1964 

1965 

1966 

1967 

1968 

1969 

1970 

1971 

1972 

1973 

1974 

1975 

1976 

1977 

1978 

1979 

1980 

1981 

1982 

1983 

1984 

1985 

1986 

1987 

1988 

1989 

1990 

1991 

1992 

1993 

1994 

1995 

1996 

1997 

1998 

1999 

2000 

2001 

2002 

2003 

2004 

2005 

2006 

2007 

2008 

2009 

2010 

2011 

2012 

2013 

2014 
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I I I I 
!PE!EU! ! 
I I I I 



I 
I 

i 



I I 

!WP! 
I I 



I I 
!AE! 
I I 



IIIIIIIl 
ADDRESS ! ! 

IIIIIIIl 

15 14 13 12 11 10 09 08 07 06 05 04 03 02 01 00 

Bit assignments are defined as follows: 

BIT 15 PARITY ERROR 

BIT14 EQB ERROR 
RETRIEVAL If the 
memory is on an 
Extended QBUS. when 
BIT14 is zero, the low 
order failing 
addresses are 
available (Bits 
11-17): when BIT14 Is 
one. the high order 
failing addresses are 
available (Bits 16 21 
of address). If the 
memory is on a QBUS. 
a Jumper disables this 
bit so that it is read 
only, and equal to ze- 
ro. 

BITS 11-5 ERROR 
ADDRESS With BIT 14 
set, they contain the 
high order parity er 
ror address (Bits 
21-18 of address): 
with BIT14 cleared, 
they conta'n the low 
order parity error ad- 
dress (Bits 17-11 of 
address). 

BIT02 WRITE WRONG 
PARITY Normal parity 
(odd) when clear: 
other parity (even) 
when set. 

BITOO ACTION ENABLE No 
action when clear; 
trap to vector 114 
when set. 



SEO 0042 
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2016 

2017 

2018 

2019 

2020 

2021 

2022 

2023 

2024 

2025 

2026 

2027 

2028 

2029 

2030 

2031 

2032 

2033 

2034 

2035 

2036 

2037 

2038 

2039 

2040 

2041 

2042 

2043 

2044 

2045 

2046 

2047 

2048 

2049 

2050 

2051 

2052 

2053 

2054 

2055 

2056 

2057 

2058 

2059 

2060 

2061 
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SEQ 0043 



6.0 SUB -TEST SUMMARIES 

6.1 Tests 



TEST 



TEST 



Tr<;T 



TEST 



TEST 



TEST 



BIT TEST OF ALL CSR'S/MATCH ALl CSR'S WITH MEMORY 
(CSR Access may cause wrong Type of Traps) 



TEST BANK 0 ACCESSES 
Failures are fatal. 



TEST BANKS 1-177 (OCTAL) FOR ZEROS AND ONES 
Errors are not typed here - only logged in 
the configuration table 

4 

ECC INHIBIT MODE POINTER TEST 
5 

DIAGNOSTIC MODE DISPATCH ROUTINE 

This test runs all the patterns in the 

mode selected. 



UNIQUE BANK TEST 
Pattern 27 is run 
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2063 

2064 

2065 

2066 

2067 

2068 

2069 

2070 

2071 

2072 

2073 

2074 

2075 

2076 

2077 

2078 

2079 

2080 

2081 

2082 

2083 

2084 

2085 

2086 

2087 

2088 

2089 

2090 

2091 

2092 

2093 

2094 

2095 

2096 

2097 

2098 

2099 

2100 

2101 

2102 

2103 

2104 

2105 

2106 

2107 

2108 
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SEQ 0044 



6.2 Tests 

6.2.1 General Test Information 

Actual Tests are identified by symbolic locations "MTPXYY" where X 
may be any sub program indicator (A,B,C,etc) or 0 and YY will be the 
number o* the test. 

Setup procedures for each test are identified by symbolic locations 
'TTOOYY" where YY will be the number of the test. 

Tests reside in 4 scripts that are scanned for execution. Symbolic 
location "MKCSRT" is a table of tests that can run once for each 
ECC bank. Symbolic location "MKPAT" is a table of tests that 
can run on each Bank of ECC memory. 

Symbolic location "MJPAT" is a table of tests that can run on each 
Bank of Parity memory. Symbolic location "FSPAT" is a table of 
tests that can be run in Field Service Mode (command 5). 

The 1st 3 scripts are completely controlled by the APT E-table (even 
if not running under APT). Modifications to this table can be made 
(1) with APT. or (2) manually. 

Example E-table Segment: 

THE FOLLOWING LOCATIONS SPECIFY WHICH TESTS 
ARE TO BE RUN FOR PARTICULAR MEMORIES 

REFERENCE THE TABLE LISTED BELOW TO RELATE BITS TO TESTS. 
BITO SET WILL RUN THE FIRST ENTRY IN THE TABLE. BITO SET 
IN THE SECOND WORD WILL RUN THE 17TH ENTRY IN THE TABLE... 



!note**null tests 


DO NOT TAKE ANY TIME 
















RECOMMENDED 


VALUE 






$00W0: 


.WORD 


177777 


sECC CSR TESTS 


177777 


TABLE = 


MKCSRT : 


«DDW1: 


.WORD 


177777 


;ECC CSR TESTS 


177777 


TABLE ' 


MKCSRT : 


$DDU2: 


.WORD 


177777 


:ECC TESTS 


103777 


TABLE = 


MKPAT; 


$DDU3: 


.WORD 


177777 


jECC TESTS 


177777 


TABLE = 


MKPAT: 


$DDU4: 


.WORD 


177777 


: PARITY TESTS 


003777 


TABLE = 


MJPAT : 


$DDU5: 


.WORD 


177777 


s PARITY TESTS 


177774 


TABLE * 


MJPAT : 



G4 
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SEQ 0045 

2110 
2111 
2112 
2113 
2114 
2115 

2116 6.2.2 Specific Tests 

2117 

2110 

2119 

2120 

2121 6.2.2.1 Test 0 Basic Data Test 

2122 

2123 Writes Reads R2 into a 16K Bank. 

2124 

2125 This is used for Zeros and Ones testing and in Field Service Mode for 

2126 any console selected Test. 
2127 

2128 It can execute out of the USER Instruction PAR's. 

2129 

2130 

2131 NOTE 
2132 

2133 It is frequently modified dynamically 

2134 such that CI) it returns after writing 

2135 only (the 1st NOP is replaced with a 

2136 RETURN) or (2) it only counts Errors 

2137 (the code PERR02 and NOP are replaced 

2138 with INC 9«PATERR). 
2139 
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SEQ 0046 

2141 
2142 
2143 
2144 
2145 
2146 
2147 
2148 
2149 

2150 6.2.2.2 Test 1 Address Test 

2151 

2152 Urites Reads an incrementing pattern equivalent to physical 

2153 addressed into a 16K Bank. 
2154 

2155 It can execute out of the USER Instruction PAR's. 

2156 

2157 

2158 



14 
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2160 
2161 
2162 
2163 
2164 

2165 6.2.2.3 Test 2 Complement Ackiress Test 

2166 

2167 Writes the complement of the physical address from high addresses to 

2168 low (write down) and reads from low addresses to high (read up). 
2169 

2170 This provides the complement of the coverage of Test 1 in both data 

2171 pattern and addressing sequence. 
2172 

2173 It can execute out of the USER Instruction PAR's. 



SEQ 0047 
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2175 
2176 
2177 
2178 
2179 
2180 

2181 6.2.2.4 Test 3 3 XOR 9 

2182 

2183 Writes Reads a Test that complements as address bits 3 and 9 

2184 change. 
2185 

2186 This test is run 4 times (1) with Zeros Ones. (2) with Ones 

2187 Zeros. (3) with 401 Ones, and (4) with Ones 401. The test of 

2188 the 401 is to force a the parity bits to become involved. 
2189 

2190 It can execute out of the USER Data POR's, the User Instruction PAR's. 

2191 the Kernel Data PAR's and the Supervisor Data PAR's. 
2192 



SEQ C048 



I<4 
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SEQ 0049 

2194 
2195 
2196 
2197 
2198 
2199 
2200 

2201 6.2.2.5 Test 4 Rotating Zeros Test 

2202 

2203 Writes a background pattern of Ones. Rotates a Zero Carry Bit left 

2204 thru each par of bytes (16 times) and then checks that the carry is 

2205 Zero and the word (2 bytes) is still all Ones. 
2206 

2207 It can execute out of the User Data PAR'S and the Kernel Data PAR'S. 

2208 

2209 

2210 NOTE 
2211 

2212 It is not uncommon to observe the good 

2213 data equal to the bad data. This 

2214 indicates that the carry was not clear 

2215 after 18 ROLB's. 
2216 

2217 
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SEQ 0050 

2219 
2220 
2221 

2221 
222* 

2225 6.2.2.6 Test 5 Rotating Ones Test 

2226 

2227 Writes a background pattern of Zeros. Rotates a One carry bit left 

2220 thru each pair of bytes (16 times) and then checks that the Carry is a 

2229 One and the Word (2 Bytes) is still all Zeros. 

2230 

2231 This provides the complement of the coverage of Test 4 in data. 

2232 

2233 It can execute out of the User Data PAR's and the Kernel Data PAR's. 

2234 

2235 

2236 NOTE 
2237 

2238 It is not uncommon to observe the good 

2239 data equal the bad data. This indicates 

2240 that the Carry was not set after 18 

2241 ROLB's. 
2242 

2243 
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2245 
2246 
2247 
2248 
2249 
2250 

2251 6.2.2.7 Test 6 Initial Data Test 

2252 

2253 Urites Reads a double word first with all bits 0 except 1 (for every 

2254 bit position). Second with all bits 1 except 1 (for every bit 

2255 pos i t i on ) 
2256 

2257 This is a very quick check of the data paths. 

2256 



SEQ 0051 
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SEQ 005a 

2260 
2261 
2262 
2263 
2264 
2265 
2266 

2267 6.2.2.8 Test 7 Address Bit Test 

2268 

2269 Writes a background of all Zeros. 

2270 Read Address I for a 0 Byte. 

2271 Complement Address 1. 

2272 Read Address 1 for a non 0 Byte. 

2273 For each Address Bit position from Bit 1: 

2274 Virtual (2. 4. 10, 20, 40. 100, 200. 400, 1000, 2000, 4000, 10000. 

2275 60000, 20000) 

2276 Physical (60002, 60004, 60010, 60020, 60040, 60100, 60200, 60400, 

2277 61000, 62000, 64000. 70000. 140000, 100000) 

2278 Read Address for a 0 word. 

2279 Complement Address contents. 

2280 Read Address for a non -zero word. 
2261 

2262 This is a very quick check of the address bit uniqueness. 

2283 

2284 



B5 
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SEQ 0053 

2286 
2287 
2288 
2289 
2290 
2291 

2292 6.2.2.9 Test 10 Byte Addressing Test 

2293 

2294 Uith ECC Disabled. 

2295 Urites all ones to a double word. 

2296 For each of the 4 Bytes in the Double Word. 

2297 Clears one byte. 

2298 Reads all 4 bytes from double word. 

2299 Checks for only proper byte clear. 

2300 All other bytes set to all ones. 
2301 

2302 This is only done on one double word address. 

2303 

2304 

2305 NOTE 
2306 

2307 This is run for ECC memory only 

2308 

2309 
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2311 

2312 

2313 

2314 

2315 

2316 

2317 

2318 

2319 

2320 

2321 

2322 

2323 

2324 

2325 

2326 

2327 

2328 

2329 

2330 

2331 

2332 

2333 

2334 

2335 

2336 

2337 

2338 

2339 

2340 

2341 

2342 

2343 

2344 

2345 

2346 

2347 

2348 

2349 
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SEQ 0054 



6.2.2.10 



2. 

3. 

4. 

5. 

6. 
7. 



Test 14 Basic Double Bit Error Test 

Urite the CSR to enable diag mode with a double bit error 
check bits of 110011 and Uncorrectable Error Indication 
enabled. 

Urite fir.,t AUT in a 16k bank with data of all zero's. 
This Mill write the check bits in (1) 

Read address, this should cause a double bit error. BUS PBL 
is asserted and we check for a parity trap to occur. 

Read the CSR for check bits in (1) and Uncorrectable Error 
Indicator. 

Urite ones to the high byte of the address under test. Since 
a DSE exsists at this address the write should be aborted. 

Read address and check for a Parity trap to occur as a result of (5) 

Repeat 5 and 6 for data of ones in the low byte and check for 
write abort and parity trap. 



This test checks to see if a double bit error will be aborted and a 
byte write of a double bit error will be aborted. 



NOTE 



This test is only run for the MSVll-J 
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2351 
2352 
2353 
2354 
2355 
2356 

2357 6.2.2.11 Test 17 Holding I's O's Test 

2358 

2359 

2360 1. Urite a 16K Bank with alternating Bytes of Zeros Ones 

2361 writing a Byte at a time. 
2362 

2363 2. Read each Word for correct Test. 

2364 

2365 3. Do (1-2) again for a complement Test. 

2366 

2367 This checks the memory for the capability of holding O's I's. 



SEQ 0055 
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SEQ 0056 



2369 

2370 

2371 

2372 

2373 

2374 

2375 

2376 

2377 

2378 

2379 

2380 

2381 

2382 

2383 

2384 

2385 

2386 

2387 

2388 

2389 

2390 

2391 

2392 

2393 

2394 

2395 

2396 

2397 

2398 

2399 

2400 

2401 

2402 

2403 

2404 

2405 

2406 



6.2.2.12 Test 20 Syndrome Bits to the CSR on a SBE Test 

1. Write CSR with check bits to correct bit 0 of the first AUT 
16k bank from a 0 to a 1 with diag mode. 

2. Write AUT with data of O's creating a SBE. 

3. Clear CSR. 

4. Read the AUT to clock the address and syndromes into the CSR. 

5. Read the CSR for the SBE indicator, bit 4. 

6. Write the CSR to diag mode to clock the syndrome bits into 
CSR bits 5-11. 

7. Read the CSR for the proper syndrome bits. 

8. Repeat 1-7 for all 16 data bits. 

9. Repeat 1-8 for data of ones so that a correction Hill occur 
from a 1 to a zero. 

This test checks to see that the EDC chip can detect Single Bit 
errors for all 16 data bits by checking for CSR bittf4 and that 
the proper syndrome bits are placed in the CSR. 



NOTE 

This test is only run for the MSVll-J 
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2408 

2409 

2410 

2411 

2412 

2413 

2414 

2415 

2416 

2417 

2418 

2419 

2420 

2421 

2422 

2423 

2424 

2425 

2426 

2427 

2428 

2429 

2430 

2431 

2432 

2433 

2434 

2435 

2436 

2437 

2438 

2439 

2440 

2441 

2442 

2443 

2444 

2445 

2446 

2447 

2448 

2449 

2450 

2451 

2452 

2453 

2454 

2455 

2456 

2457 
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S£Q 0057 



6.2.2.13 Test 21 Marching O's I's Test 

1. Urite a Background of alternating Bytes of Zeros Ones 

2. For the 16K Bank addressing Down 

(a) Read check a word 

(b) Byte Swap a word 

(c) Read check a word 

3. For the 16K Bank addressing Up 

(a) Read check a word 

(b) Byte Swap a word 

(c) Read check a word 

4. For the 16K Bank addressing Up 

(a) Read check a word 

(b) Byte Swap a word 

(c) Read check a word 

5. For the 16K Bank addressing Down 

(a) Read check a word 

(b) Byte Swap a word 

(c) Read check a word 

This checks the integrity of the 32 Bit Double Words. 
It can execute out of the User Data PAR's. 



NOTE 

It is not uncommon to see a misleading 
error typeout because the second test in 
each case is based upon a byteswap of 
the first test which may or may not have 
failed. If the error report indicates 
errors in pairs with the bad bit in the 
second report being the same bit 
position relative to a byte then you 
should ignore the second error report. 
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2459 




2460 


6.2.2.14 


2461 




2462 




2463 


1. 


2464 




2465 




2466 




2467 




2468 




2469 




2470 




2471 




2472 




2473 




2474 




2475 




2476 




2477 




2478 




2479 




2480 




2481 




2482 




2483 




2484 




ii a c 

2485 




^ ii a£ 

2486 




2487 




2468 




2489 




2490 




2491 




4^ il A «K 

2492 




2493 


i . 


'^ii Ail 

2494 




'^ A AF 

2495 


4 . 


2496 




^ M A^ 

2497 




2498 


c 


2499 




2500 




2501 




2502 








2504 




2505 




2506 




2507 




2508 




2509 




2510 




2511 





Write a diagonal Test of ones on every KOIAGCTH) stripe 
write zeros elsewhere. 

This Test is on addresses not bit positions. 
Example : 

Address MSB's 
LSB's 



NOTE 

Example uses KOI AG of value 4 more typical is a value 
of 8. Consult the symbolic definition of "KDIAG" in 
the program listing to be sure. 



Disturb each row for > 3.2ms 
Read check diagonal pattern 

Do (1-3) KOI AG times moving the placement of the diagonal 
stripe to cover all address positions. 

Oo (1-4) for a complement pattern 
(zeros in a background of ones) 



NOTE 

This test is not normally executed 
except under APT or ACT. It may be 
invoked VIA Field Service Command 13 
(Kamikaze Mode). 



SEQ 0058 
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SEQ 0059 

2513 
2514 
2515 
2516 
2517 

2518 6.2.2.15 Test 23 Shifti.ig Diagonal Test 

2519 

2520 Similar in overall operation to test 22 except it does not delay 

2521 for refresh and disturb rows. 
2522 

2523 

2524 NOTE 
2525 

2526 This test is not normally executed 

2527 except under APT or ACT. It may be 

2528 invoked VIA Field Service Command 13 

2529 (Kamikaze Mode). 
2530 

2531 
2532 
2533 



15 
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SEQ 0060 

2535 
2536 
2537 
2538 
2539 

2540 6,2.2 16 Test 24 Fast Galloping Pattern Test 

2541 

2542 This does a classical galloping pattern except that addressing is 

2543 incremented by 400 Octal (every 64th double word) 
2544 

2545 

2546 NOTE 
2547 

2548 This test is not normally executed 

2549 except under APT or ACT. It may be 

2550 invoked VIA Field Service Command 13 

2551 (Kamikaze Mode). 
2552 

2553 
2554 
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?556 

2557 

2558 

2559 

2560 

2561 

2562 

2563 

2564 

2565 

2566 

2567 

2568 

2569 

2570 

2571 

2572 

2573 

2574 

2575 

2576 

2577 

2578 

2579 

2580 

2581 

2582 

2583 

2584 

2585 

2586 

2587 
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SFQ 0061 



6.2.2.17 Test 26 Random Data Test 

Urite Random Data in a 16K Bank while incrementing the Addresses. 
Read check Random Data. 

This routine regenerates the same random numbers by using the same 



seed as the write sequence. After the read check the seed is updated 
so that the next use of this pattern will not invoke the same sequence 
of random numbers. 

If you wish to change the random sequence so that it is different than 
any other run in the same configuration then there are 2 ways of do'ng 
so. 

1. Modify symbolic locations "SEEOHI" and "SEEDLQ" to any number 
you like. 

2. Enter Field Service Mode and execute this Test (command 5) 
on some (any good) bank for a short time (30 sec or so). 

This can execute out of the User Data PAR'S, the Kernel Data PAR'S, 
and the Supervisor Data PAR'S. 
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2589 
2590 
2591 
259? 
2593 
2594 
2595 
2596 
2597 
2598 
2599 
2600 
2601 
2602 
2603 
2604 
2605 
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SEQ 0062 



6.2.2.18 Test 27 Unique Bank Test 

This Test uses Test 0 to write read the Bank number in each 
bank . 

It does not test Banks that require relocation to test. 

It does not run as pdrt of any script but rather is always run after 
normal pattern tests are complete. 
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<J607 
260S 
2609 
2610 
2611 
2612 
2613 
2614 
2615 
2616 
2617 
2618 
2619 
2620 
2621 
2622 
2623 
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SEQ 0063 



6.2.2.19 Test 30 Flush Out OBE's Test 

This Reads each location then moves the old value back in. This is 
done with ECC Disabled and therefore corrects any OBE's or SBE's (if 
possible). 

It does not run as part of any script but rather is always run Just 
prior to the End of Pass Code, as part of a Control "C" (Boot) 
command, as part of End of Pass shutdown for ACT or XXDP Chain Mode, 
as part of hanging sequence after an error if under ACT or APT, and as 
part of a shutdown sequence directed by Switch 8 (Halt Program). 
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2625 

2626 

2621 

2626 

2629 

2630 

2631 

2632 

2633 

2634 

2635 

2636 

2637 

2638 

2639 

2640 

2641 

2642 

2643 

2644 

2645 

2646 

2647 

2648 

2649 

2650 

2651 

2652 

2653 

2654 

2655 

2656 

2657 

2658 

2659 

2660 

2661 

2662 

2663 

2664 

2665 

2666 

2667 

2668 

2669 

2670 

2671 

2672 

2673 

2674 

2675 

2676 

2677 
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6.2.2.20 Test 31 SOB-A-LONG Test 
Rat i onal i zat i on 



SEQ 0064 



In order to concentrate the memory cycles of a test into a particular 
address, we must cut the overhead cycles to a minimum. Frequently, 
the instruction itself may provide adequate data or set up a 
background in which any complemented bit may find it hard to survive. 

The SOB instruction is the only PDP-11 instruction that is (1) a 
single operand, (2) can be repeatedly executed at the sane PC and, (3) 
can escape this repetitious loop. 

Hence, it can be possible to SOB a MOS cell to death (or at least 
brain wash him), and to SOB a core into over-heating (or at least warn 
discomfort) . 

The SOB Routine will be loaded and called with RO set equal to the SOB 
constant "SOBK". Rl set equal to the complement of a "SOBRO,." 
Instruction "100776". 



Simplified SOB Example! 



2$: 



SOB 
MOV 
CMP 
BEQ 

SOBFAIL 
SOBMOVl 
S0BM0V2 
S0BM0V3 
S0BM0V4 
SOBMOV. . 



R0,1$ 
Rl.l$ 
Rl.l$ 
2$ 



SOB till RO underflows 

Urite complement of SOB 

Read check not SOB 

Skip if OK 

Trap report error 

Code to get self moved 

Forward 1 word and run again 



The value of the SOB constant can be found at symbolic location "SOBK" 
(typical 25 decimal). 

This test is not in the normal script of execution but may be added 
via the APT E- TABLE, reference symbolic locations "MKPAT". "MJPAT". 
"I00U2-5". Field Service Mode command 8 is the normal method of 
running this pattern. 

NOTE 

This test is not normally executed 
except under APT or ACT. It may be 
invoked VIA Field Service Command 13 
(Kamikaze Mode). 



CVMJAAO MSVll-J MEMORY DIA6, 



2679 

2680 

2681 

2682 

2683 

2684 

2685 

2686 

2687 

2688 

2689 

2690 

2691 

2692 

2693 

2694 

2695 

2696 

2697 

2698 

2699 

2700 

2701 

2702 

2703 

2704 

2705 

2706 

2707 

2708 

2709 

2710 

2711 

2712 

2713 

2714 

2715 

2716 

2717 

2718 

2719 

2720 

2721 

2722 

2723 

2724 

2725 

2726 

2727 

2728 
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SEQ 0065 



6.2.2.21 Test 32 Urite Recovery Test 

This test causes a URITE, READ, URITE, READ. ... to occur in memory 
and if the 1st. 3rd, 5th, ...READ is bad the program may bomb or if 
the 2nd, 4th, 6th, ... READ is bad the program will gracefully type 
out the error, 

Urite Recovery Test 

This test differs from other tests in that it consists 

of a small test program actually running in the bank under test. 

The program is self modifying and may be difficult to dcbu^. 
To aid in the debug, remember that the bank and margin are being 
displayed. This Mill allow the user to at least see which memory 
bank Tailed. 

The test consists of 1/2 of the bank stored with "MOV R2,-(PC)" 
and the other 1/2 containing "177667". "177667" is the complement 
of "JMP (RO)" instruction. R2 contains "COM -(Rl)" instruction 
on entry to the bank and Rl contains the highest test address in 
that bank. 

If you understand this so far the rest is easy. 
The test execution is as follows: 

1. The "MOV R2,-(PC)" instruction executes storing 

the contents of R2 in the address it vacated (due to -(PC), 

2. Since R2 contains a "COM -(Rl)" instruction it complenmnts 
the highest address under test, this address contained 
"177667" so after the COM -(Rl) it equals 110 

cleverly this is the "JMP (RO)" instruction. 

3. This sequence continues until the "MOV R2,-(PC)" 
instructions reach the middle of the test bank, 
then the "JMP (RO)" instruction is met 

and executed. RO contained the return address back 
to test 13. 

4. These steps are repeated for each bank under test. 



NOTE 

This test is not normally executed 
except under APT or ACT, It may be 
invoked VIA Field Service Command 13 
(Kamikaze Mode), 



CVMJAAO MSVll-J MEMORY DIAG. 



2730 
2731 
2732 
2733 
2734 
2735 
2736 
2737 
2738 
2739 
2740 
2741 
2742 
2743 
2744 
2745 
2746 
2747 
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SEQ 0066 



2763 
2764 
2765 
2766 
2767 
2768 
2769 
2770 
2771 
2772 
2773 
2774 
2775 
2776 
2777 
2778 



b.2.2.22 Test 33 Branch Gobble Test 

This test loads a small routine into the memory under test. The 
routine moves itself along in memory one word after each pass so that 
when it reaches the end every instruction has executed from every 
location with the exception of the beginning and end of each test 
area. 



The Branch Gobble's general format after you eliminate setup code 
code to move the program along is as follows. 



and 



2748 


BGTEST: 


0 




:TEST WORD 


2749 


BRGOBB: 


SEC 






2750 




AOCB 


BGTEST 


iINC LOU BYTE 


2751 




BMI 


1$ 


sENO LOOP AFTER 128 TIMES 


2752 




INCB 


BGTEST»1 


jINC HIGH BYTE 


2753 




BR 


BRGOBB 


;LOOP 128 TIMES 


2754 


U: 


BVS 


2$ 


{BRANCH IF V-BIT SET (SHOULD BE) 


2755 




ERROR 




: ERROR TRAP 


2756 


2ii 


CLV 




;CLEAR V-BIT 


2757 




INCB 


BGTEST 


;INC HIGH BYTE ONE LAST TIME 


2758 




BCS 


3$ 


jBRANCH IF C-BIT SET (SHOULD NOT BE) 


2759 




BVC 


3$ 


{BRANCH IF V-BIT CLtAR (SHOULD NOT BE) 


2760 




BMI 


4$ 


{BRANCH IF N-BIT SET (SHOULD BE) 


2761 


3*: 


ERROR 




{ERROR TRAP 


2762 


4$: 


RETURN 







This code oriaionally came from the PDP-11 Family Instruction 
Exerciser DZQKA-A, The first MOS memorys fell succeptable to this 
section of that diagnostic and it has been an important memory 
exerciser ever since. 



NOTE 

This test is not normally executed 
except under APT or ACT. It may oe 
invoked VIA Field Service Command 13 
(Kamikaze Mode). 



CVMJAAO MSVll-J MEMORY 0IA6. 



2780 

2781 

2782 

2783 

2784 

2785 

2786 

2787 

2788 

2789 

2790 

2791 

2792 

2793 

2794 

2795 

2796 

2797 

2798 

2799 

2800 

2801 

2802 

2803 

2804 
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SEQ 0067 



6.2.2.23 Test 34 Soft Error Test 
Rationalization 



MOS chips have a failure mode in which they can randomly pick or drop 
bits. This is caused by Alpha particles bombarding the cell. If the 
cell is very small (and they are) then the electrons displaced by the 
Alpha particle are sufficient to cause the cell to change from a one 
to a zero or from a zero to a one. 

This test is contT-olled by the main program so that it is used to 
create a Test of x25252 and 52525 on alternate passes of the 
program. The configuration table is used to flag banks that have the 
Test invalidated because another Test was written over this 
background. 

This Test is nothing more than a clever use of Test 0. 



D6 
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SEQ 0068 

2806 
2807 
2808 
2809 
2810 
2811 

2812 6.2.2.24 Test 35 Worst Case Parity Test 

2813 

2814 

2815 1. Force Write Wrong Parity in each IK word block of the Memory 

2816 Under Test. 
2817 

2818 2. Read with Parity Trapping enabled, making sure that a trap 

2819 occurrs. 
2820 

2021 3. Make sure error address bits are set correctly. 

2822 

2823 4. Write good parity without trapping, and make sure no trap 

2824 occurrs when read. 
2825 

2826 
2827 
2828 

2829 NOTE 
2830 

2831 This test is run for parity memory which 

2832 is not controlled by the same GSR as the 

2833 program. 
2834 
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2836 
2837 
2838 
2839 
2840 

2841 6.2.2.25 Test 36 Correction Code Test 

2842 

2843 1. Urite CSR with check bits to correct bit 0 of the first address 

2844 in a 16k bank from a 0 to a 1 with diag mode. 
2845 

2846 2. Urite AUT Nith data of O's. 

2847 

2848 3. Read AUT for correction of bit 0 from a 0 to a 1. 

2849 

2850 4. Repeat 1 3 for all 16 data bits. 

2851 

2852 5. Repeat 1-4 for data of ones so that a correction niII occur 

2853 from a 1 to a zero. 
2854 

2855 This test checks to see that the EDC chip can correct Single Bit 

2856 Errors for all 16k data bits from a 1 to a 0 and visa versa. 
2857 

2858 

2859 NOTE 
2860 

2861 This test is only run for the MSVll-J 

2862 



SEQ 0069 



CVMJAAO MSVll-J MEMORY OIAG. 



2864 

2865 

2866 

2867 

2868 

2869 

2870 

2871 

2872 

2873 

2874 

2875 

2876 

2877 

2878 

2879 

2880 

2881 

2882 

2883 

2884 

2885 

2886 

2887 

2888 



F6 
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SEQ 0070 



6.2.2.26 Test 37 Check ECC Disable Test 

1. Urite CSR with ECC disable. Diag mode, and S6E check bits 
of 000010. 

2. Write AUT with data of zero's. This should write check bits to 
memory . 

3. Read AUT for data of zeros insuring no correction was made. 

NOTE 

This test is run on the MSVll-J only. 



G6 

CVMJAAO MSVll-J MEMORY OIAG. MACRO VOS.Olb Friday 15-Feb-85 16:10 Pag« 72 

SEQ 0071 

2890 
2891 
2892 
2893 
2894 
2895 

2896 6.2.2.27 Test 41 Address to CSR on DBE Test 

2897 

2898 1. Urite CSR with ECC disable, Diag mode, and Double Bit error 

2899 check bits of 010011 
2900 

2901 2. Urite AUT with data of zeros creating a DBE. 

2902 

2903 3. Read AUT to detect DBE and to clock address into CSR 

2904 

2905 4. Read CSR for correct address in bits 5-11. 

2906 

2907 5. Increment address by Ik and repeat i-4 until 16k is done. 

2908 

2909 This test insures that the correct address appears in CSR bits 5-11 on a OBE 

2910 

2911 

2912 NOTE 
2913 

2914 This test is run on a MSVll-J oniy. 

2915 

2916 

2917 
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SEQ 0072 

2919 
2920 
2921 
2922 
2923 

2924 6.2.2.28 Test 42 Extended Address to CSR on Error Test 

2925 

2926 1. Write CSR with SBE check bits of 000010 with Diagnostic Mode. 

2927 

2926 2. Write low address in a 16k bank with data of zeros creating a 

2929 SBE. 

2930 

2931 3. Clear the CSR. 

2932 

2933 4. Read address to detect SBE. 

2934 

2935 5. Read CSR for correct address and the SBE indicator bit #4. 

2936 

2937 6. Enable CSR bit 14 to check the Extended address bits. 

2936 

2939 7. Read CSR for correct address bits 

2940 

2941 8. Repeat 1-7 with a test address that is the highest in a 16k bank. 

2942 

2943 This test checks to see that the correct address bits apppear in the CSR. 

2944 This is also repeated for the Extended Address function in the CSR. 
2945 

2946 NOTE 
2947 

2946 This test is only run for the MSVll J 

2949 

2950 

2951 

2952 

2953 



CVnjAAO 



2955 

2956 

2957 

2958 

2959 

2960 

2961 

2962 

2963 

2964 

2965 

2966 

2967 

2968 

2969 

2970 

2971 

2972 

2973 

2974 

2975 

2976 

2977 

2978 

2979 

2980 

2981 

2982 

2983 

2984 

2985 

2986 

2987 

2988 

2989 

2990 

2991 

2992 

2993 

2994 
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SEQ 0073 



6.2.2.29 Test 43 Urite Byte Test 

1. Urite CSR to Diag mode with check bits of 001100. These 
correspond to data of zeros. 

2. Urite first AUT with data of one in bit zero. The write 
effectively creates a SBE in byte 0. 

3. Clear the CSR 

4. Urite byte 1 of the AUT with data of all ones. 

5. Read CSR to check for SBE indication. 

6. Urite the CSR to D=ag mode. 

7. Read the AUT to check for the correct data -- all ones in high byte 
and all zeros in low byte. 

8. Read the CSR to check for correct check bits corresonding to the data 
read in (7). These check bits are 000110. 

9. Repeat (l)-(8) this time creating an error in byte 1 (2) and writing 
byte 0 in (4). 

This test checks to see that a SBE will be corrected during the read portion of the 
byte write and that correct checkbits will be generated on the write. 



NOTE 

This test is only run for the MSVll-J 
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2996 

2997 

2998 

2999 

3000 

3001 

3002 

3003 

3004 

3005 

3006 

3007 

3008 

3009 

3010 

3011 

3012 

3013 

3014 

3015 

3016 

3017 

3018 

3019 

3020 

3021 

3022 

3023 

3024 

3025 

3026 

3027 

3028 

3029 

3030 

3031 

3032 

3033 

3034 

3035 

3036 

3037 

3038 

3039 
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SEQ 0074 



6.2.2.30 Test 44 Shifting Checkbits through the CSR Test 

1. Urite CSR to Oiag Mode to Enable Checkbit register. 

2. Urite CSR with check bits of 000001. ECC disable and Diag mode 

3. Urite memory with data of zeros. This should write the check bits 
into memory. 

4. Complement check bits pattern and write CSR as in (2). 

5. Read CSR for complement check bit pattern. 

6. Read memory to read check bits written in (2) into CSR. 

7. Read CSR for corret check bits written in (2). 

8. Shift check bit pattern and repeat (1-7) till CSR bits 5-10 are done. 

9. Complement check bit pattern in (2) and repeat (1 8) shifting a zero 
through a field of ones. 

10. Repeat 1-9 for every 100 octal locations in 16k 

This test checks the ability to read check bits from the CSR to memory and back. 
The test is done twice. Once shifting a field of a one through a field of zeros 
and a zero through a field of ones. This tests the Checkbit/Syndromc bit register 
and Check bit RAM's. This test is done for every 100 octal locations in 16K. 

NOTE 

Trtis test is only run for the MSVll-J 
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3041 

3042 

3043 

3044 

3045 

3046 

3047 

3048 

3049 

3050 

3051 

3052 

3053 

3054 

3055 

3056 

3057 

3058 

3059 

3060 

3061 

3062 

3063 

3064 

3065 

3066 

3067 

3068 

3069 

3070 

3071 

3072 

3073 

3074 

3075 

3076 
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SEQ 0075 



6.2.2.31 Test 45 Syndrome Bits to the CSR on a OBE Test 

1. Urite CSR with 0!ag mode to enable Check /Syndrome bit Register. 

2. Urite CSR with OBE check bits of 110011 with Oiag mode. 

3. Urite memory with data of zeros creating a OBE. 

4. Clear CSR. 

5. Read memory to detect OBE. 

6. Read CSR for Uncorrectable error indicator. 

7. Urite CSR to Oiag mode to read Syndrome bits into CSR. 

8. Read CSR for correct Syndrome bits of 111111. 

9. Repeat (1-8) with Muliple Bit Error check bits of 111100 and 
corresponding Syndrome Bits of 110000. 

This test checks the ability of the CSR to detect a OBE and read for the proper 
Syndrome bits g nerated by the EDC chip. This test is then repeated with check 
bits corresponding to a Multiple Bit error. 

NOTE 

This test is only run for the MSVll-J 
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3078 

3079 

3060 

3081 

308? 

3083 

3084 

3085 

3086 

3087 

3088 

3089 

3090 

3091 

3092 

3093 

3094 

3095 

3096 

3097 

3098 

3099 

3100 

3101 

3102 

3103 

3104 

3105 

3106 

3107 

3108 

3109 

3110 

3111 

3112 

3113 

3114 
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SEQ 0076 



6.2.2.32 Test 46 Check Single Bit Errors with ECC Disabled Test 

1. Urite CSR nith check bits to correct bit 0 of the first address 
in a 16k bank from a 0 to a 1 with diag mode and ECC disabled. 

2. Urite AUT with data of O's thus creating a SBE. 

3. Urite the CSR to ECC disable. 

4. Read AUT to detect SBE. 

5. Check to see that no trap occured. 

6. Read CSR to see that uncorrectable error (CSR15) is set. 

7. Repeat 1-6 for all 16 data bits. 

8. Repeat 1-7 for data of ones so that a correction will occur 
from a 1 to a zero. 

9. Repeat 1-8 except in steps (3) the CSR is written to ECC Disable 
and BUS PBL enable and (5) we check for traps. 

This test checks to see that SBE are treated a uncorrectable errors with ECC 
Disable. The test is repeated 2 times, once with traps disabled and again 
with it enabled, this is done for all 16 possible SBE conditions. 

NOTE 

This test is only run for the MSVll-J 
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SEQ 0077 



3116 




3117 




3118 




3119 




3120 




3121 


6,2.2.33 


3122 




3123 


1. 


3124 




3125 


2. 


3126 




3127 


3. 


3128 




3129 


4. 


3130 




3131 


5. 


3132 




3133 


6. 


3134 




3135 


7. 


3136 




3137 


8. 


3138 




3139 


9. 


3140 




3141 


10. 


3142 




3143 




3144 


This test c 


3145 


memory when 


3146 




3147 




3148 




3149 





Test 47 NO CSR Update On SBE with exsi sting QBE test 
Urite the CSR to Oiag mode to enable Checkb it/Syndrome bit Register. 
Urite the CSR with QBE check bits of 110011 and Oiag mode. 
Urite memory with data of zeros creating a OBE. 
Urite CSR with SBE check bits of 000010 and Oiag mode. 
Urite memory 4k above address in (3) creating a SBE. 
Clear CSR. 

Read memory with address in (3) to detect OBE. 

Read CSR for correct address and Uncorrectable error ndicator 

Read memory with address in (5) to detect SBE. 

Read CSR for SBE indicator and no change in OBE status in CSR 

in (8) 



in 



NOTE 

This test is only run for the MSVll-J 
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SEQ 0078 

3151 
3152 
3153 
3154 
3155 
3156 

3157 6.2.2.34 Test 999 Null Test 

3158 

3159 This is an instant return added to preserve the software structure. 

3160 

3161 This test replaces any real tests when the APT E-Table does not 

3162 specify a test to be run. 
3163 



cvnjAAo nsvii-j nEnoRv oiag. 



3165 

3166 

3167 

3168 

3169 

3170 

3171 

3172 

3173 

3174 

3175 

3176 

3177 

3178 

3179 

3180 

3181 

3182 

3183 

3184 

3185 

3186 

3187 

3188 

3189 

3190 

3191 

3192 

3193 

3194 

3195 

3196 

3197 

3198 

3199 

3200 

3201 

3202 

3203 

3204 

3205 

3206 

3207 

3208 

3209 

3210 

3211 

3212 

3213 

3214 

3215 

3216 

3217 

3218 
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SEQ 0079 



7.0 PROGRAM FEATURES 

7.1 Fast Data Access Rates 

One of the main areas of concern in testing Htemorv in systens 
environments is speed. One of the prime reasons that system prograiMl 
like RSTS.IAS and MUflPS can crash due to memory failures not 
detectable by memory diagnostics (0-124K,0-2 MEG, etc.) is because of 
multiple NPR devices contending for the bus. After some delay a NPR 
device becomes bus master and does several memory transfers at memory 
data rates. 

On the other hand most diagnostics when Nriting reading and/or 
checking patterns spend most of their time fetching instructions and 
operands out of their program space and proportionally little time 
accessing the memory under test. 

This diagnostic's error detecting abilities have been optimized around 
the primary design criteria of speed. To this end the follONing steps 
have been taken. 



7.1.1 Fast City 

Utilization of flemory Mana9ement Registers as Non Memory Bus, Non 
QBUS. Bipolar Memory. Since User Mode is only used for relocation 
and Data Space is never used, then subroutines can be executed from 
the UIPAR's, UDPAR's, KOPAR's. SOPAR's and nith some Bit Pattern 
restrictions the UIPOR's, UDPOR's, KOPOR's, and SOPOR'S. 

The program runs in Kernel mode and Patterns are executed in 
Supervisor mode for mapping purposes. All core patterns and some MOS 
Patterns are subroutines that are moved to this Bipolar region 
referred to in the program as Fast City, 



NOTE 

18-BIt PDP-11' s cannot execute from the 
PAR'S because their PAR's are only 12 
bits Hide: they also have no Supervisor 
Mode. Therefore, all patterns are 
executed in memory, using User Mode 
(reference Section 7.5). 



7.1.2 SOB'S 



CVMJAAO MSVll-J MEMORr OIAG. 



3220 

322: 

3222 

3223 

3224 

3225 

3226 

3227 

3228 

3229 

3230 

3231 

3232 

3233 

3234 

3235 

3236 

3237 

3238 

3239 

3240 

3241 

3242 

3243 

3244 

3245 

3246 

3247 

3248 

3249 

3250 

3251 

3252 

3253 

3254 

3255 

3256 

3257 

3258 

3259 

3260 

3261 

3262 

3263 

3264 

3265 

3266 

3267 

3268 

3269 

3270 

3271 

3272 

3273 
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Utilization of the full PDP-11 Instruction Set to speed pattern 
algorithms (principally the SOB). 



7.1.3 CACHE 

CACHE is used between pattern tests to decrease program pass tines. 
CACHE can be defeated by the operator (reference section 2.4.3.1). 



7.2 Bank Zero Testing 

Bank Zero has been traditionally neglected by memory diagnostics for 
the following reason. 

The vector space exists there and ALL traps must not access test 
pattern data. If the area is tested the diagnostic must not use ory 
traps, and it is against the rules for power to fail. 

Systems with Memory Management can overcome this because all traps are 
to Kernel Virtual space even if the power should fail (caution must be 
observed because power up goes to physical address 24 (because the 
Memory Management Unit comes up off)). 

However. Catch 22 is that the diaonostic is not APT compatible in this 
mode because APT Accesses Physical Memory Locations. 

The POP -11/83 can over come this because the QBUS Map can fool APT. 

Because of the previous arguments this program does not relocate in 
the true since of the word (i.e. no position independent code was 
written (at least not on purpose)), but rather this program moves and 
remaps (hereafter referred to as relocates). This enables the 
complete testing of Bank Zero or any other prooram space or privileged 
space exactly as all other banks are tested. (The conditional test to 
see if a bank is protected is complemented when relocated). 

NOTE 

The program will relocate only in the 
first pass under APT; after this, the 
program will remain fixed in Banks 0 and 
1. 



7.3 Memory Configuration Map 



SEQ 0080 



D7 
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3275 

3276 

3277 

3278 

3279 

3280 

3281 

3282 

3283 

3284 

3285 

3286 

3287 

3288 

3289 

3290 

3291 

3292 

3293 

3294 

3295 

3296 

3297 

3298 

3299 

3300 

3301 

3302 

3303 

3304 

3305 

3306 

3307 

3308 

3309 

3310 

3311 

3312 

3313 

3314 

3315 

3316 

3317 

3318 

3319 

3320 
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This map is printed out immediately after sizing the memory unless SU6 
is set (reference section 2.4.1). It can also be printed at any later 
time in Field Service Mode (reference section 2.4.4.8.7) 



SEQ 0081 



Example : 



ERRORS 

MEMTYPE 

CSR 

PROTECT 



ERRORS 

MEMTYPE 

CSR 

PROTECT 



MEMORY CONFIGURATION MAP 
16K BANKS 

1 2 3 4 5 6 7 

012345670123456701234567012345670123456701234567012345670123 
XX 

EEEEEEEPPPPPPPPPPPPPPPPPPPPPPPPEEEEEEEEEEEEEEEEEEEEEEEEEEEEE 

000000001 1 1111 1 122222222222222224444444444444444444444444444 

PP I I P I 

1111111 
0 1 2 3 4 5 6 

456701234567012345670123456701234567012345670123456701234567 

EEEE 
4444 



0' splayed are Banks 0 77 Octal (1 meg words). If the Fat Terminal 
Switch was set (reference section 2.4.1) then all Banks (0-177) would 
be shown. If this was an 18-Bit POP-11 (eg - 11/23). only Banks 0-7 
would be printed. 
The fields: 



ERRORS: 



The si7'ng routine could not write zeros and ones in Banks 
10 11, iience they are marked as bad with X's. 



ERRORS: 
MEMTYPE: 



Banks 0-7 are Memory Type E (MSVll-J), and Banks 10-37 are 
Memory Type P (MSVll-L/P) and Banks 40-77 are memory type 
E(MSVll-J). Banks 100-167 do not exist. 



CSR: 



I 



CVMJAAO nSVn-J MEMORY OIAG. 



3322 

3323 

3324 

332S 

3326 

3327 

3328 

3329 

3330 

3331 

3332 

3333 

3334 

3335 

3336 

3337 

3338 

3339 

3340 

3341 

3342 

3343 

3344 

3345 

3346 

3347 

3348 

3349 

3350 

3351 

3d3c 

3353 

3354 

3355 

3356 

3357 

3356 

3359 

3360 

3361 

3362 

3363 

3364 

3365 

3366 
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Banks 0-7 ar« assigned to CSR 172100. 10-17 to CSR 172102. 
and 20-37 to interleaved CSR's 172104 and 172106 and banks 
40-77 are assigned CSR 17210. 



PROTECT: 



Banks 0 and 1 are protected because they are program space. 
Bank 0 and 1 can also be protected because they are in the 
bottom 16K of an MSVll-L/P CSR. The protection is hierarchical 
and program space overshadows HSVll-L/P protection. Banks 0 
and 1 will not be tested until the program relocates. 



7.4 Everything You've Always Wanted To Know About SUPERMAC ... 

SUPER-MAC is a set of structured programming macros that allows 
programs to be written in a high level, easily understood language. 

As a general rule, most SUPER-MAC statements can be single-line 
statements or multiple-line (nested) block statements. A single-line 
statement must be completed on one source line; no continuation lines 
are allowed. Single-line statements should be as short and simple as 
possible. Comments may also be included on a source line. All the 
general rules, conditions, etc., that govern MACRO 11 also govern 
SUPER-MAC. Spacing on a source Ine is very important. The elements 
should be separated by a comma or a space. Tabs should never be used 
for spacing. For example: The expression A*6 is interpreted 
different than A ♦ B. 

All the conditional statements can be written as multiple-line nested 
blocks. Each level of nest i no within a block must be terminated with 
an associated END statement, bach level of nesting should be indented 
two spaces. 

User written macros or assembly language instructions may be included 
in a program if desired. As a debugging aid, if the symbol LST$$ is 
defined, it will cause generated code and labels to be listed. All 
programs must begin with the macro call SMACIT. This call initializes 
SUPER-MAC. All legal POP 11 source and destination operands are legal 
in SUPER-MAC. 



SEQ 0082 



CVMJAAO MSVll-J MEMORf OIAG. 
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SEQ 0083 



3368 

3369 

3370 

3371 

3372 

3373 

3374 

3375 

3376 

3377 

3378 

3379 

3380 

3381 

3382 

3383 

3384 

3385 

3386 

3387 

3388 

3389 

3390 

3391 

3392 

3393 

3394 

3395 

3396 

3397 

3398 

3399 

3400 

3401 

3402 

3403 

3404 

3405 

3406 

3407 

3406 

3409 

3410 

3411 

3412 

3413 

3414 

3415 

3416 

3417 

3418 

3419 

3420 

3421 



7,4,1 Sample Source File 
.ENABL ABS 
.ENABL AMA 
.MCALL .SUPER 
.SUPER 
;LST**=0 
BIT5=40 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 



A 
8 

C 
D 
E 
F 
G 
H 
I 
J 

.PAGE 
:LET EXAMPLES 
LET RO 



:= A 

= C < 

= F H 

= H 1 
= J ^ 
6= B 



LET B 
LET E 
LET G 
LET J 
LET A 
:IF EXAMPLES 

IF A IS TRUE 
nov 23. D 
END ;0F IF A 
IF B IS FALSE 
MOV 



1 
2 

01 



34. E 

END {OF IF B 

IF A EQ B THEN LET C := 

IF A LT B 

MOV CO 
ELSE 

MOV E.O 
END iCF IF A 
IF A EQ B AND C NE D 

MOV F.G 
END ; OF IF A 
IF A EQ B OR C NE D 

MOV F.G 
END sOF IF A 
IFB A EQ B AND C EQ 1 

MOV H.J 
ELSE 

MOV E.J 
END sOF IFB A 
IFB A EQ 6 ANDB C EQ 1 

MOV H.J 
ELSE 

MOV E.J 



CVMJAAO MSVll-J MEMORY DIAG. 



3423 

3424 

3425 

3426 

3427 

3426 

3429 

3430 

3431 

3432 

3433 

3434 

3435 

3436 

3437 

3438 

3439 

3440 

3441 

3442 

3443 

3444 

3445 

3446 

3447 

3448 

3449 

3450 

3451 

3452 

3453 

3454 

3455 

3456 

3457 

3458 

3459 

3460 

3461 

3462 

3463 

3464 

3465 

3466 

3467 

3468 

3469 

3470 

3471 

3472 

3473 

3474 

3475 
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END :0F IFB A 
IF RESULT IS EQ 

MOV A.B 
END :0F IF RESULT 
IF BITS SET. IN A 

MOV B . C 
END sOF IF BITS 
IF BITS OFF. IN A 

MOV CD 
END ;0F IF BITS 
; ON. ERROR IS LIKE AN IF STATEMENT ON THE C-BIT 
: ON. ERROR EXAMPLES 
ON. ERROR 

MOV A.B 
ELSE 

MOV C.B 
END :0F ON. ERROR 
ON.NOERROR 



C.B 



SEQ 0084 



:B' B 



-S TO 23 



140 BY 4 



MOV 
ELSE 

MOV A.B 
END :0F ON.NOERROR 
ON. ERROR THEN LET A 
;FOR EXAMPLES 
FOR I 
INC 

END sOF FOR I 
FOR RO := 0 TO 

DEC A(RO) 
END ;0F FOR RO 
FOR I :* 133 DOWNTO 

ADO A.B 
END ;0F FOR I 
; BEGIN EXAMPLES 

BEGIN ALPHA 
FOR RO :« 
MOVB 
IF B LT 
END ;0F FOR RO 
FOR RO 400 TO S67 

IF B GE 0 THEN LEAVE ALPHA 
END :0F FOR RO 
END ALPHA 
;$RETURN EXAMPLES 
$RETURN 
$RETURN ERROR 
JRETURN NOERROR 
;CASE EXAMPLES 

MOV A.RO 
CASE RO 
A 



3 BY 2 



TO 167 

A(RO).B 
THEN LEAVE ALPHA 



■ ■■ ■ 








/MJAAO MSVll-J MEMORY DIAG. 
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-Feb-85 


3477 




B 




3478 




c 




3479 




D 




3480 




E 




3481 




F 




3482 




END J OF 


CASE RO 


3483 






3484 




.END 




3485 








3486 








3487 


7.4.2 


Sample Listing F 


3488 


.MAIN. 


MACRO Mini 01 


3489 








3490 








3491 


1 


000000 




3492 


2 






3493 


3 






3494 


4 


000000 




3495 


5 






3496 


6 




000040 


3497 


7 


000000 


000000 


3498 


8 


000002 


000000 


3499 


9 


000004 


000000 


3500 


10 000006 


000000 


3501 


11 


000010 


000000 


3502 


12 


000012 


000000 


3503 


13 


000014 


000000 


3504 


14 


000016 


000000 


3505 


15 


000020 


000000 


3506 


16 


000022 


000000 


3507 








3508 








3509 


.MAIN. 


MACRO Mini 01 


3510 








3511 








3512 


18 






3513 


19 


000024 




3514 


20 


000030 




3515 


21 


000044 




3516 


22 


000056 




3517 


23 


000072 




3518 


24 


000100 




3519 


25 






3520 


26 


000106 




3521 


27 


000114 


012737 


3522 


28 


000122 




3523 


29 


000122 




3524 


30 


000130 


012737 


3525 


31 


000136 




3526 


32 


000136 




3527 


33 


000154 




3528 


34 


000164 


013737 


3529 


35 


000172 





H7 



Page 86 



SEQ 0085 



PAGE 2 



.ENABL ABS 

.ENABL AMA 

.MCALL .SUPER 

.SUPER 

:LSTU=0 

BIT5-40 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 



;LET EXAMPLES 
LET RO 



= A 
C ^ 
F * 

H 4 

J i 
« B 



1 
2 

01 



000023 000006 



000034 000010 



000004 000006 



LET B 
LET E 
LET G 
LET J . 
LET A :B 
J IF EXAMPLES 

IF A IS TRUE 

MOV 23. D 
END J OF IF A 
IF B IS FALSE 

MOV 34. E 
END ;0F IF B 
IF A EQ B THEN LET C 
IF A LT B 

MOV CD 
ELSE 



17 
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SEQ 00B6 



3531 


36 


000174 


013737 


000010 


000006 


MOV E.D 


3532 


37 


000202 








END :0F IF A 


3533 


38 


000202 








IF A EQ B AND C NE 0 


3534 


39 


000222 


013737 


000012 


000014 


MOV F.G 


3535 


40 


000230 








END :0F IF A 


3536 


41 


000230 








IF A EQ B OR C NE D 


3537 


42 


000250 


013737 


000012 


000014 


MOV F.G 


3538 


43 


000256 








END iOF IF A 


3539 


44 


000256 








IFB A EQ 6 AND C EQ 1 


3540 


45 


000276 


013737 


000016 


000022 


MOV H.J 


3541 


46 


000304 








ELSE 


3542 


47 


000306 


013737 


000010 


000022 


MOV E.J 


3543 


48 


000314 








END ;0F IFB A 


3544 


49 


000314 








IFB A EQ B ANDB C EQ 1 


3545 


50 


000334 


013737 


000016 


000022 


MOV H.J 


3546 


51 


000342 








ELSE 


3547 


52 


000344 


013737 


000010 


000022 


MOV E.J 


3548 


53 


000352 








END ;0F IFB A 


3549 


54 


000352 








IF RESULT IS EQ 


3550 


55 


000354 


013737 


000000 


000002 


MOV A.B 


3551 


56 


000362 








END ;0F IF RESULT 


3552 


57 


000362 








IF BITS SET. IN A 


3553 


58 


000372 


013737 


000002 


000004 


MOV B.C 


3554 


59 


000400 








END :0F IF BIT5 


3555 


60 


000400 








IF BIT5 OFF. IN A 


3556 


61 


000410 


013737 


000004 


000006 


MOV CD 


3557 


62 


000416 








END sOF IF BITS 


3558 


63 










; ON. ERROR IS LIKE AN IF STATEMENT ON THE 


3559 


64 










; ON. ERROR EXAMPLES 


3560 


65 


000416 








ON. ERROR 


3561 


66 


000420 


013737 


000000 


000002 


MOV A.B 


3562 


67 


000426 








ELSE 


3563 


68 


000430 


013737 


000004 


000002 


MOV C.B 


3564 


69 


000436 








END ;0F ON. ERROR 


3565 


70 


000436 








ON.NOERROR 


3566 


71 


000440 


013737 


000004 


000002 


MOV C.B 


3567 


72 


000446 








ELSE 


3568 


73 


000450 


013737 


000000 


000002 


MOV A.B 


3569 


74 


000456 








END :0F ON.NOERROR 


3570 














3571 














3572 


.MAIN. 


MACRO Mini 01 


-APR -79 


16:41 PAGE 3-1 


3573 














3574 














3575 


75 


000456 








ON. ERROR THEN LET A :B» B 


3576 


76 










;FOR EXAMPLES 


3577 


77 


000466 








FOP I :« -5 TO 23 


3578 


78 


000474 


005237 


000000 




INC A 


3579 


79 


000500 








END :0F FOR I 


3580 


80 


000514 








FOR RO :» 0 TO 140 BY 4 


3581 


81 


000516 


005360 


000000 




DEC A(RO) 


3582 


82 


000522 








END iOF FOR RO 


3583 


83 


000534 








FOR I :> 133 OOUNTO 3 BY 2 



CVMJAAO MSVll-J MEMORY DIAG. 



J7 

MACRO VOS.Olb Friday 15-Feb-85 16:10 Page 88 



SEQ 0067 



3585 


84 


000542 


063737 


000000 000002 






ADD A. 8 


3586 


85 


000550 










END :0F FOR I 


3587 


86 








; BEGIN EXAMPLES 


3588 


87 


000566 










BEGIN ALPHA 


3589 


88 


000566 










FOR RO :» 0 TO 167 


3590 


89 


000570 


116037 


000000 000002 






MOVB AlRO}.B 


3591 


90 


000576 










IF B LT 0 THEN LEAVE 


3592 


91 


000604 










END ;0F FOR RO 


3593 


92 


000614 










FOR RO := 400 TO 567 


3594 


93 


000620 










IF B GE 0 THEN LEAVE 


3595 


94 


000626 










END :0F FOR RO 


3596 


95 


000636 










END ALPHA 


3597 


96 








:$RETURN EXAMPLES 


3598 


97 


000636 










$ RET URN 


3599 


98 


000640 










^RETURN ERROR 


3600 


99 


000644 










$RETURN NOERROR 


3601 


100 








iCASE 


EXAMPLES 


3602 


101 


000650 


013700 


000000 






MOV A,RO 


3603 


102 


000654 










CASE RO 


3604 


103 


000664 


000000 








A 


3605 


104 


000666 


000002 








B 


3606 


105 


000670 


000004 








C 


3607 


106 


000672 


000006 








D 


3608 


107 


000674 


000010 








E 


3609 


108 


000676 


000012 








F 


3610 


109 


000700 










END jOF CASE RO 


3611 


110 














3612 


111 




000001 








.END 


3613 
















3614 


7.4.3 Sample Listing F 


le (Mith Expanded Macros) - - 


3615 


.MAIN. 


MACRO Mini 01 


-APR-79 16:10 


PAGE 2 




3616 
















3617 
















3618 


1 


000000 










.ENABL ABS 


3619 


2 












.ENABL AMA 


3620 


3 












.MCALL .SUPER 


3621 


4 


000000 










. SUPER 


3622 


5 




000000 








LST$*=0 


3623 


6 




000040 








BIT5»40 


3624 


7 


000000 


000000 




A 




0 


3625 


8 


000002 


000000 




B 




0 


3626 


9 


000004 


000000 




C 




0 


3627 


10 


000006 


000000 




0 




0 


3628 


11 


000010 


000000 




E 




0 


3629 


12 


000012 


000000 




F 




0 


3630 


13 


000014 


000000 




G 




0 


3631 


14 


000016 


000000 




H 




0 


3632 


15 


000020 


000000 




I 




0 


3633 


16 


000022 


000000 




J 




0 


3634 
















3635 
















3636 


.MAIN. 


MACRO Mini 01- 


APR-79 16:10 


'AGE 3 
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SEQ 0086 



3638 


18 










;LET 


EXAMPLES 


3639 


19 


000024 










LET RO :- A 


3640 




000024 


013700 


000000 






MOV A.RO 


3641 


20 


000030 










LET B :« C ♦ D 


3642 




000030 


013737 


000004 


000002 




MOV C.B 


3643 




000036 


063737 


000006 


000002 




ADO D.B 


3644 


21 


000044 










LET E :« F ♦ 1 


3645 




000044 


013737 


000012 


000010 




MOV F,E 


3646 




000052 


005237 


000010 






INC E 


3647 


22 


000056 










LET 6 H ♦ 2 


3648 




000056 


013737 


000016 


000014 




MOV H,G 


3649 




000064 


062737 


000002 


000014 




ADO 2,G 


3650 


23 


000072 










LET J := J ♦ 01 


3651 




000072 


062737 


A A A A A A 

000001 


A A A A A A 

000022 




ADO 01 , J 


3652 


24 


000100 










LET A :B» B 


3653 




000100 


113737 


A A A A A 

000002 


A tfV A A A 

000000 




MOVB B.A 


3654 


25 










;IF 


EXAMPLES 


3655 


26 


000106 










IF A IS TRUE 


3656 




000106 


005737 


000000 






TST A 


3657 




000112 


001403 








BEQ LO 


3658 


27 


000114 


012737 


000023 


000006 




MOV 23 , D 


3659 


28 


AAA • AA 

000122 










END jOF IF A 


3660 




000122 








LO: 




3661 


29 


000122 










IF B IS FALSE 


3662 




A A A a AA 

000122 


005737 


000002 






TST B 


3663 




AAA a A ^ 

000126 


AAA AAV 

001003 








BNE LI 


3664 


30 


A A A • 9 A 

000130 


012737 


A A A A9 A 

000034 


AAAA a A 

000010 




MOV 34 , E 


3665 


31 


000136 










^KIA A^ A 

END :0F IF B 


3666 




000136 








LI : 




3667 


32 


000136 










IF A EQ B TKEN LET 


3668 




000136 


A A V ^ 

023737 


A A A A A A 

000000 


AAAAAA 

000002 




CMP A,B 


3669 




000144 


AA 4 AA9 

001003 








BNE L2 


3670 




AAA t il £ 

000146 


013737 


AAAAAf 

000006 


AAAAA A 

000004 




MOV D.C 


3671 




AAA i C ii 

000154 








L2: 


3672 


33 


AAA i B il 

000154 










IF A LT B 


3673 




AAA * C A 

000154 


023737 


AAAAAA 

000000 


AAAAA ^ 

000002 




CMP A,B 


3674 




AAA t f 

000162 


A A A A A Jl 

002004 








BGE L3 


3675 


34 


000164 


013737 


AAAAA A 

000004 


AA A A Af 

000006 




MOV C , D 


3676 


35 


000172 










ELSE 


3677 




A A A t ^ A 

000172 


AAA A A9 

000403 








nn I A 

BR L4 


3678 




000174 








L3: 




3679 


36 


000174 


013737 


AAAA i A 

000010 


AAAAAA 

000006 




MOV E . 0 


3680 


37 


A A A A A ^ 

000202 










END ;0F IF A 


3661 




UUUcUc 








1 A . 

Lt : 




3682 


38 


000202 










IF A EQ B AND C NE 


36^' 




000202 


023737 


000000 


000002 




CMP A.B 


If 




000210 


001007 








BNE L5 


36oj 




000212 


023737 


000004 


000006 




CMP CD 


3686 




000220 


001403 








BEQ L5 


3f97 


39 


000222 


013737 


000012 


000014 




MOV F.G 


3bd8 


40 


000230 










END jOF IF A 



L7 
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3690 




000230 






L5: 




3691 


41 


000230 








IF A EQ B OR C NE 0 


3692 




000230 


023737 


000000 


000002 


CMP A.B 


3693 




000236 


001404 






BEQ L6 


3694 




000240 


023737 


000004 


000006 


CMP CD 


3695 




000246 


001403 






BEQ L7 


3696 














3697 














3698 


.MAIN, 


MACRO Mini 01 


-APR 79 


16:10 PAGE 3-1 




3699 














3700 














3701 




000250 






L6: 




3702 


42 


000250 


013737 


000012 


000014 


MOV F.G 


3703 


43 


000256 








END :0F IF A 


3704 




000256 






L7: 




3705 


44 


000256 








IFB A EQ B AND C EQ 


3706 




000256 


123737 


0000*^0 


000002 


CMPB A.B 


3707 




000264 


001010 






BNE LIO 


3708 




000266 


023727 


000004 


000001 


CMP C. 1 


3709 






001004 






BNE LIO 


3710 


45 


000276 


013737 


000016 


000022 


MOV H.J 


3711 


46 


A M A V A M 

000304 








ELSE 


3712 




000304 


0004 






BR Lll 


3713 




A A A 9 A ^ 

000306 






LIO: 




3714 


47 


A A A9 A^ 

000306 


013737 


000010 


000022 


MOV E.J 


3715 


46 


000314 








END ;0F IFB A 


3716 




A A A9 a M 

000314 






Lll: 




3717 


49 


000314 








IFB A EQ B AN06 C EQ 


3718 




000314 


123737 


000000 


A A 4^ A 4^ A 

000002 


CMPB A.B 


3719 




A A A9 A A 

000322 


A A a A 4 A 

001010 






BNE L12 


3720 




A AAV A 

000324 


« A9^A^ 

123727 


A A A A A A 

000004 


AAAAA a 

000001 


CMPB C, 1 


3721 




000332 


AA4 A A A 

001004 






BNE L12 


3722 


50 


AAA9 9 Jl 

000334 


A4 9^9^ 

013737 


A A A A a ^ 

000016 


A A A A A A 

000022 


MOV H . J 


3723 


51 


AA A9 M A 

000342 








ELSE 


3724 




000342 


AAA m A9 

000403 






BR L13 


3725 




A AAV M A 

000344 






L12: 




3726 


52 






A A >^ M A 

000010 


A A A A A A 

000022 


MOV E , J 


3727 


53 


000352 








END iOF IFB A 


3728 




000352 






L13: 




3729 


54 


000352 








IF RESULT IS EQ 


3730 




000352 


001003 






BNE L14 


3731 


55 


000354 


013737 


A A A A A A 

000000 


A A A A A A 

000002 


MOV A , B 


3732 


56 


000362 








END ;0F IF RESULT 


3733 




000362 






L14: 




3734 


57 


000362 








IF BITS SET. IN A 


3735 




000362 


032737 


AAAAil A 

000040 


AAAAAA 
000000 


DTT DTTC A 
BIT bIT3.A 


3736 




000370 


001403 






BEQ L15 


3737 


58 


000372 


013737 


000002 


000004 


MOV B.C 


3738 


59 


000400 








END :0F IF BITS 


3739 




000400 






L15: 




3740 


60 


000400 








IF BITS OFF. IN A 


3741 














3742 




000400 


032737 


000040 


000000 


BIT BITS. A 
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SEQ 0090 



3744 


61 


000410 


013737 


000004 


000006 


MOV CD 


3745 














3746 


62 


000416 








END ;0F IF BIT5 


3747 




000416 






Lib: 




3740 


63 








; ON. ERROR IS LIKE AN IF STATEMENT ON 


3749 


64 








2 ON. ERROR EXAMPLES 


3750 


65 


000416 








ON. ERROR 


3751 




000416 


103004 






BCC L17 


3752 


66 


000420 


013737 


000000 


000002 


MOV A,B 


3753 


67 


000426 








ELSE 


3754 




000426 


000403 






BR L20 


3755 




000430 






L17: 




3756 














3757 


68 


000430 


013737 


000004 


000002 


MOV C.B 


3758 














3759 


69 


000436 








END iOF ON. ERROR 


3760 




000436 






L20: 




3761 


70 


000436 








ON.NOERROR 


3762 














3763 














3764 


.MAIN. 


MACRO Mini 01 


-APR -79 


16:10 PAGE 3- 


•2 


3765 














3766 














3767 




000436 


103404 






BCS L21 


3768 


71 


000440 


013737 


000004 


000002 


MOV C.B 


3769 


72 


000446 








ELSE 


3770 




000446 


000403 






BR L22 


3771 




000450 






L21: 




3772 


73 


000450 


013737 


000000 


000002 


MOV A.B 


3773 


74 


000456 








END :0F ON.NOERROR 


3774 




000456 






L22: 




3775 


75 


000456 








ON. ERROR THEN LET A :B B 


3776 




000456 


103003 






BCC L23 


3777 




000460 


113737 


000002 


000000 


MOVB B,A 


3778 




000466 






L23: 


3779 


76 








;F0R 


EXAMPLES 


3780 


77 


000466 








FOR I :» -5 TO 23 


3781 




000466 


012737 


177773 


000020 


MOV -5.1 


3782 




000474 






BO: 


3783 


78 


000474 


005237 


000000 




INC A 


3784 


79 


000500 








END ;0F FOR I 


3785 




000500 


005237 


000020 




INC I 


3786 




000504 


023727 


000020 


000023 


CMP I. 23 


3787 




000512 


003770 






BLE BO 


3788 




000514 






EO: 




3789 


80 


000514 








FOR RO :» 0 TO 140 BY 4 


3790 




000514 


005000 






CLR RO 


3791 




000516 






Bl: 




3792 


81 


000516 


005360 


000000 




DEC A(RO} 


3793 


82 


000522 








END ;0F FOR RO 


3794 




000522 


062700 


00000 




ADD 4.R0 


3795 




000526 


020027 


000140 




CMP RO. 140 
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SEQ 0091 



T7Q7 






003771 


5 170 




V/WJ Jt 






83 


WVJ J^ 








000S34 

VW J J*» 


01P737 

VXC ' J r 


30U1 




OOOS49 

VW J*»c 






84 




063737 


SOUS 














162737 

AwC 9^9 






000556 


023727 






000S64 


002366 

Wb WWW 


^A07 




000S66 

WVW^WW 






86 

WW 








87 

w r 


000566 








000S66 






SB 

WW 


000566 




3A1P 




000S66 


005000 

W W ^ W WW 






000570 




^814 


89 


000570 

WW ^ ( w 


116037 


ISIS 


90 


000576 

WW^ r W 








000576 


005737 


3817 




000602 


002415 


3818 


91 


000604 




3819 




000604 


005200 


3820 




000606 


020027 


3821 




000612 


003766 


3SP2 




000614 




3AP'V 


92 


000614 




JOC"f 




000614 


012700 


38?6 








YAd7 


.MAIN. 


MACRO Mllll 01 










3A99 




000620 




3A30 






JO 


93 


000620 




3832 




000620 


005737 


3833 




000624 


002004 


3A3A 


94 


000626 




3A'fS 

JO J^ 




000626 


005200 


38311 

jO jv 




000630 


020027 


3837 




000634 


003771 


3838 

jO jO 




000636 




383Q 

jO J7 


95 


000636 




3840 




000636 




3841 


96 






3842 


97 


000636 




3843 




000636 


000207 


3844 


98 


000640 




3845 




000640 


000261 


3846 




000642 


000207 


3847 


99 


000644 




3848 




000644 


000241 


3849 




000646 


000207 



000133 

000000 

000002 
000020 



000020 

000002 

000020 
000003 



El: 



B2: 



BLE 81 

FOR I :- 133 D0UN70 
MOV 133.1 



3 PY 2 



AOO A, 8 
END ;0F FOR I 
SUB 2.1 
CMP I. 3 
BGE 82 

E2: 

i BEGIN EXAMPLES 

BEGIN ALPHA 



000000 
000002 

000167 
000400 



000002 



83: 



84: 



FOR RO 
CLR RO 



0 70 167 



E4: 



MOVB 
IF 8 LT 
TST 8 
8LT E3 

END ;0F FOR RO 
INC RO 
CMP RO, 167 
BLE 84 



A(R0).8 
0 THEN LEAVE ALPHA 



FOR RO := 
MOV 400.ro 



400 TO 567 



85: 

IF 8 GE 0 THEN LEAVE ALPHA 
TST 8 
BGE E3 

END :0F FOR RO 
INC RO 
CMP RO, 567 
BLE B5 

E5: 

END ALPHA 

E3: 

sJRETURN EXAMPLES 
^RETURN 
RTS PC 

(RETURN ERROR 
SEC 

RTS PC 

(RETURN NOERROR 
CLC 

RTS PC 
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3051 


100 






3052 


101 


000650 


013700 


3053 


102 


000654 




3054 




000654 


010046 


3055 




000656 


006316 


3056 




000660 


004737 


3057 


103 


000664 


000000 


3050 


104 


000666 


000002 


3059 


105 


000670 


000004 


3060 


106 


000672 


000006 


3061 


107 


000674 


000010 


3062 


108 


000676 


000012 


3063 


109 


000700 




3064 




000700 




3065 




000700 


062616 


3066 




000702 


013646 


3067 




000704 


004736 


3060 


110 






3069 


111 




000001 



;CASE EXAMPLES 
MOV 



3070 
3071 
3872 
3873 
3874 
3875 
3876 
3877 
3878 
3879 
3880 
3881 
3882 
3883 
3884 
3885 
3886 
3887 
3880 
3889 
3890 
3891 
3892 
3893 
3894 
3895 
3896 
3897 
3898 
3899 
3900 



L24; 



A.RO 
CASE RO 
MOV RO.-(SP) 
ASL 9SP 
JSR PC.L24 
A 
B 
C 
D 
E 
F 

END :0F CASE RO 
ADD (SP)«.aSP 

MOV a(sP)»,-(SP) 

JSR PC,9(SP)* 



.END 



7.5 Memory Management Mapping 

7.5.1 Memory Management Mapping For The 11/83 - 

PAR SUPERVISOR KERNEL 



0 
1 
2 
3 
4 
5 
6 
7 



Program 
Program 
Program 
Test Area 
Test Area 
Test Area 
Test Area 
Per if Page 



Program 
Program 
Program 
Program 
Program 
Program 
Map to GSR' 
Per if Page 



USER 

Dst Bk/Fst Mem 
Src Bk/Fst Mem 
Src Bk/Fst Mem 
Src Bk/Fst Mem 
Dst Bk/Fst Mem 
Dst Bk/Fst Mem 
Dst Bk/Fst Mem 
Dst Bk/Fst Mem 



7.5.2 Memory Management Mapping For QBUS-ll's With Supervisor Mode (eg 11/236) 
PAR SUPERVISOR KERNEL USER 



0 
1 
2 
3 
4 
5 
6 
7 



Program 
Program 
Program 
Test Area 
Test Area 
Test Area 
Test Area 
Per If Page 



Program 
Program 
Program 
Program 
Program 
Program 
Map to CSR' 
Per if Page 



Dst Bk 
Src Bk 
Src Bk 
Src Bk 
Dst Bk 
Dst Bk 
Dst Bk 
Dst Bk 



C8 
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SEO 0093 

3902 

3903 7.5.3 Memory Management Mapping For QBUS-ll's U/o Supervisor Mod* (eg 11/2') - 
3904 

3905 PAR KERNEL USER 

3906 --- 

3907 0 Program Program/Dst Bk 

3908 1 Program Program/Src Bk 

3909 2 Program Program/Src Bk 

3910 3 Program Test Area/Src Bk 

3911 4 Program Test Area/Dst Bk 

3912 5 Program Test Area/Dst Bk 

3913 6 Map to CSR's Test Area/Dst Bk 

3914 7 Per if Page Per if Page/Dst Bk 
3916 



D8 
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SEQ 0094 



3918 

3919 000000 

3920 

3921 

3922 

3923 

3924 

3925 

3926 

3927 

3928 

3929 

3930 

3931 

3932 

3933 

3934 

3935 

5936 000000 

3937 163000 

3938 000001 

3939 000000 



.LIST 

.ENABL 

.ENABL 

.DSABL 

;NOTE: 

;THIS 

.MCALL 

.MCALL 

.MCALL 

.MCALL 

.MCALL 

-MCAlL 

•MCALL 

.MCALL 

.NLIST 

.LIST 

.NLIST 

LST**" 

$SUR- 

ilH' 

SMACIT 



TOC 
ABS 
AHA 
GBL 

CVMJAO.SML IS THE SUPER. MAC SOURCE AND IS RELEASED UITH 
PROGRAM. ALL THESE .MCALL STATEMENTS REFERENCE THAT FILE. 
SMACIT. . .PUSH, . .POP. . .TAG. . .BRAN. .EMIT . .EMITN. .EMITL. .EMITR 
. IFOPR . . IS . . GENBR . . OPAOD . . OPSUB . CLEAR , SET . CLEARS . SETB 
RNE . REQ . RL T . RGE . RGT . RLE . RPL , RMI , RHI . RLOS . RHIS . RLO . RCS , RCC 
IF , . OR , . IF ARI . . LEAVE . . GOTO . OR , AND . THEN , ELSE . WHILE . CASE 
FOR , TO , DOUNTO , REPEAT . UNTIL . THRU , END . BEGIN 
$ $END , LEAVE . JUMPTO . GOTO , PUSH , POP .LET 

. SIMPLE . . ARITH , ORB . ANDB . IFB . UNTILB . UHILEB . ON . ERROR . ON . NOERROR 
$CALL.$RETURN 



TTM 

MC.SYM 
MO.CND.ME 

0 

163000 
1 



I WANT FAT PAPER! 

LIST MACRO CALLS. SYMBOL TABLE 

DON'T LIST MACRO DEFS L CONDITIONALS £ EXPANSIONS 
DEFINED TO LIST SUPERMAC EXPANSIONS 
USE THESE SYSMAC SWITCHES 
FIRST TEST NUMBER TO ONE(l) 



E8 
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DEFINE 


TRAPS 










3942 










.SBTTL DEFINE TRAPS 


3943 








;ALL ENTRIES HERE MUST HAVE A CORRESPONDING ENTRY IN THE 


3944 








iTRAP TABLE "♦TRPAD" (NEAR END OF PROGRAM). 


3945 








; *TRAP 


DEFINITIONS 




3946 














3947 








iHERE IS HOU TRAPS UORK IN THIS PROGRAM 


3948 














3949 








ALL TRAPS EXECUTE A "TRAP" INSTRUCTION UHICH TAKES THE PROGRAM 


3950 








TO SYMBOLIC LOCATION "$TRAP" 


3951 














3952 








AT $TRAP THE PROGRAM PICKS UP THE RIGHT BYTE OF THE TRAP INSTRUCTION 


3953 








AND INDEXES INTO A TABLE 


AT LOCATION "$TRPAD" UHICH SENDS THE PROGRAM TO 


3954 








THE SPECIFIC ROUTINE TO HANDLE THAT SPECIFIC TRAPS TASK. 


3955 














3956 








THE ULTIMATE DESTINATION 


OF A TRAP INSTRUCTION CAN BE GUESSED AT AS FOLLOWS 


3957 














3958 








EXAMPLE: NOP 




3959 










NOP 




3960 










NOP 




3961 










KERNEL 


s ENTER KERNEL MODE 


3962 










NOP 




3963 














3964 










ADO A DOLLAR SIGN 


TO THE SYMBOLIC NAME AND CHECK THE CRF FOR SOMETHING 


3965 










IN THIS CASE THE CRF HAS *KERNE LISTED AS 032546 


3966 










AT LOCATION 32546 


YOU FIND THE ROUTINE $KERNEL 


3967 














3968 










NOTE THAT CRF SYMBOLS ARE TRUCNATED TO 6 CHARACTERS 


3969 










SYMBOLIC NAMES GREATER THAT 6 CHARACTERS ARE USED SO I CAN 


3970 










REMEMBER UHAT THEY MEAN! 


3971 














3972 










ALL GOOD TRAP ROUTir«S RETURN VIA AN "RTI" INSTRUCTION 


3973 




104401 


■ 


rYPEIT= 


104401 : 


jTTY TYPEOUT ROUTINE 


3974 




104402 


TYPOC= 


104402 : 


[TYPE OCTAL NUMBER (UITH LEADING ZEROS) 


3975 




104403 


TYPOS" 


104403 ; 


■TYPE OCTAL NUMBER (NO LEADING ZEROS) 


3976 






.•TYPON' 


104404 s 


TYPE OCTAL NUMBER (AS PER LAST CALL) 


3977 




104405 


TYPOS" 


104405 ; 


[TYPE DECIMAL NUMBER (UITH SIGN) 


3978 






;TYPBN» 


104406 : 


;TYPE BINARY (ASCII) NUMBER 


3979 














3980 




104407 


GTSUR= 


104407 ;!GET SOFT-SUR SETTING 


3981 




104410 


CKSUR= 


104410 s 


TEST FOR CHANGE IN SOFT-SUR 


3982 














3983 




104411 


RDCHR» 


104411 s 


TTY TYPEIN CHARACTER ROUTINE 


3984 




104412 


RDLIN- 


104412 J 


TTY TYPEIN STRING ROUTINE 


3985 




104413 


R00CT= 


104413 : 


READ AN OCTAL NUMBER FROM TTY 


3986 




104414 


RDDEC» 


104414 s 


READ A DECIMAL NUMBER FROM TTY 


3987 














3988 




104415 


SAVREG= 


104415 ;!SAVE R0-R5 ROUTINE 


3989 




104416 


RESREG" 


104416 ;;RESTORE R0-R5 ROUTINE 


3990 














3991 




104417 


KERNEL « 


104417 : ENTER KERNEL MODE 


3992 














9 AAV 

3993 




104420 


ENERGIZE' 104420 :TURN ON MEMORY MANAGEMENT C TRAPS 


3994 




104421 


DEENERGIZE'104421 jTURN OFF MEMORY MANAGEMENT £ TRAPS 


3995 




104422 


KMAP» 


104422 iMAP KERNEL 1 TO 1 


3996 














3997 




104423 


CflCHON= 


104423 :TURN ON CACHE 


3998 




104424 


CACHOFF 


-104424 jTURN OFF CACHE 



SEQ 0095 
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DEFINE TRAPS 






3999 






4000 


104425 


LOADCSR-104425 


4001 


104426 


REAOCSR* 104426 


4002 






4003 


104427 


PERROl' 104427 


4004 


104430 


PERR02= 104430 


4005 


104431 


PERR03= 104431 


4006 


104432 


PERR04= 104432 


4007 


104433 


PERR07= 104433 


4008 


104434 


PERRIO- 104434 


4009 


104435 


PERRll- 104435 


4010 


104436 


PERR12- 104436 


4011 


104437 


PERR13« 104437 


4012 


104440 


PERR14= 104440 


4013 


104441 


PERR15= 104441 


4014 


104442 


PERR16= 104442 


4015 


104443 


PERR17= 104443 


4016 


104444 


PERR20- 104444 


4017 


104445 


PERR21' 104445 


4018 


104446 


PERR22> 104446 


4019 


104447 


PERR23» 104447 


4020 


104450 


PERR24> 104450 


4021 


104451 


PERR25- 104451 


4022 


104452 


PERR26- 104452 


4023 


104453 


PERR27= 104453 


4024 


104454 


PERR30* 104454 


4025 


104455 


PERR31= 104455 


4026 


104456 


PERR32= 104456 


4027 


104457 


PERR33= 104457 


4028 


104460 


PERR34' 104460 


4029 


104461 


PERR35=' 104461 


4030 


104462 


PERR36- 104462 


4031 


104463 


PERR37= 104463 


4032 


104464 


PERR40'' 104464 


4033 


104465 


PERR41= 104465 


4034 


104466 


PERR42' 104466 


4035 


104467 


PERR43- 104467 


4036 






4037 


104470 


ECCDIS= 104470 


4038 


104471 


ECC1DIS=104471 


4039 


104472 


ECCINIT=104472 


4040 


104473 


ECClINIT-104473 


4041 


104474 


CBCSR« 104474 


4042 


104475 


CB1CSR« 104475 


4043 


104476 


UASSBE- 104476 


4044 


104477 


UAS1SBE«104477 


4045 


104500 


UASDBE* 104500 


4046 


104501 


UASIDBE" 104501 


4047 


104502 


CLRCSR» 104502 


4048 


104503 


CLR1CSR=104503 


4049 


104504 


CHKDIS= 104504 


4050 


104505 


CHK1DIS=104505 


4051 


104506 


ENASBE* 104506 


4052 


104507 


ENA1SBE=104507 


4053 


104510 


TSTREAD=104510 


4054 


104511 


INVALID=104511 


4055 


104512 


ERRGEN « 104512 
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SEQ 0096 



I LOAD CORRECT CSR 
iREAD CORRECT CSR 

I PROGRAM DETECTED ERROR 
I PROGRAM DETECTED ERROR 
I PROGRAM DETECTED ERROR 
I PROGRAM DETECTED ERROR 
I PROGRAM DETECTED ERROR 
I PROGRAM DETECTED ERROR 
; PROGRAM DETECTED ERROR 
[PROGRAM DETECTED ERROR 
1 PROGRAM DETECTED ERROR 
; PROGRAM DETECTED ERROR 
; PROGRAM DETECTED ERROR 
I PROGRAM DETECTED ERROR 
; PROGRAM DETECTED ERROR 
I PROGRAM DETECTED ERROR 
I PROGRAM DETECTED ERROR 
i PROGRAM DETECTED ERROR 
I PROGRAM DETECTED ERROR 
I PROGRAM DETECTED ERROR 
I PROGRAM DETECTED ERROR 
[PROGRAM DETECTED ERROR 
[PROGRAM DETECTED ERROR 
[PROGRAM DETECTED ERROR 
[PROGRAM DETECTED ERROR 
[PROGRAM DETECTED ERROR 
[PROGRAM DETECTED ERROR 
[PROGRAM DETECTED ERROR 
[PROGRAM DETECTED ERROR 
[PROGRAM DETECTED ERROR 
PROGRAM DETECTED ERROR 
PROGRAM DETECTED ERROR 
PROGRAM DETECTED ERROR 
PROGRAM DETECTED ERROR 
PROGRAM DETECTED ERROR 

DISABLE ECC ON ALL CSR'S 

DISABLE ECC ON 1 SELECTED CSR 

INITIALIZE ALL ECC CSR'S 

INITIALIZE 1 SELECTED ECC CSR 

WRITE GENERATED CHECKBITS IN ALL CSR'S 

WRITE GENERATED CHECKBITS IN 1 SELECTED CSR 

WAS THERE A SBE ON ANY CSR? 

WAS THERE A SBE ON 1 SELECTED CSR? 

WAS THERE A DBE ON ANY CSR? 

WAS THERE A DBE ON 1 SELECTED CSR? 

CLEAR ALL CSR'S 

CLEAR 1 SELECTED CSR 

DISABLE ECC L WRITE CHECKBITS FROM ALL CSR'S 
DISABLE ECC L WRITE CHECKBITS FROM 1 SELECTED CSR 
ENABLE TRAPS ON SBE'S FROM ALL CSR'S 
ENABLE TRAPS ON SBE'S FROM 1 SELECTED CSR 
TEST LOC (Rl) L TST FOR SBE (WITHOUT FETCHES) 
INVALIDATE BACKGROUND PATTERN ON "BANK" 
CHECK ERROR ADDRESS 



G8 
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DEFINE TRAPS 

4056 104513 CBREG =104513 ; ENABLES CHECKBIT REGISTER 

4057 104514 SYNREG =104514 ; ENABLES SYNDROME BIT REGISTER 



CVrijAAO MSVll-J MEMORY DIA6. 
DEFINE BASIC POPll STUFF 
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SEQ 0098 



4060 

4061 

4062 

4063 

4064 

4065 

4066 

4067 

4068 

4069 

4070 

4071 

4072 

4073 

4074 

4075 

4076 

4077 

4078 

4079 

4080 

4081 

4082 

4083 

4084 

4085 

4086 

4087 

4088 

4089 

4090 

4091 

4092 

4093 

4094 

4095 

4096 

4097 

4098 

4099 

4100 

4101 

4102 

4103 

4104 

4105 

4106 

4107 

4108 

4109 

4110 

4111 

4112 

4113 

4114 

4115 

4116 



002000 
002000 
000740 
000700 
104000 
000004 
177776 



177570 
177570 
177546 



000011 
000012 
000015 
000200 
000007 



000006 
000006 



100000 
040000 
020000 
010000 
004000 
002000 
001000 
000400 
000200 
000100 
000040 
000020 
000010 
000004 
000002 
000001 



100000 
040000 
020000 
010000 
004000 
002000 
001000 
000400 



.SBTTL DEFINE BASIC PDPll STUFF 



!*INITIAL ADDRESS OF 
STACK= 2000 
KERSTK» STACK 
SUPSTK- 740 
USESTK= 700 
ERROR-EMT 
SCOPE" lOT 
PSW- 177776 
;STKLMT»177774 
jPIRQ" 177772 
DSWR= 177570 
DDISP- 177570 
LKS* 177546 



THE STACK POINTER 

FIRST ADDRESS OF THE STACK 
KERNEL STACK 
SUPERVISOR STACK 
USER STACK 

BASIC DEFINITION OF ERROR CALL 
BASIC DEFINITION OF SCOPE CALL 
PROCESSOR STATUS WORD 
STACK LIMIT REGISTER 
PROGRAM INTERRUPT REQUEST REGISTER 
HARDWARE SWITCH REGISTER 
HARDWARE DISPLAY REGISTER 
LINE CLOCK (KWll-L) STATUS REGISTER 



{♦MISCELLANEOUS DEFINITIONS 



HT = 
LF= 
CR« 
CRLF" 
MFPT= 



11 

12 

15 

200 

7 



CODE FOR HORIZONTAL TAB 

CODE LINE FEED 

CODE CARRIAGE RETURN 

CODE FOP CARRIAGE RETURN-LINE FEED 

CODE FOR PROCESSOR TYPE INSTRUCTION 



♦GENERAL PURPOSE REGISTER DEFINITIONS 



SP«R6 
KSP-SP 
SSP=SP 
USP=SP 
;PC=R7 



STACK POINTER 
KERNEL STACK POINTER 
SUPERVISOR STACK POINTER 
USER STACK POINTER 
PROGRAM COUNTER 



5* "SWITCH REGISTER" SWITCH DEFINITIONS 

SW15= 100000 

SW14= 40000 

SW13> 20000 

SW12= 10000 

SW11= 4000 

SW10= 2000 

SW9- 1000 

SW8- 400 

SW7« 200 

SW6" 100 

SW5" 40 

SW4" 20 

SW3» 10 

SW2= 4 

SW1= 2 

SW0> 1 

!*DATA BIT DEFINITIONS (BITOO TO BIT15) 



BIT15= 
BIT14= 
BIT13= 
BIT12= 
BIT11= 
BIT10= 
BIT9= 
BITS' 



100000 

40000 

20000 

10000 

4000 

2000 

1000 

400 



CVMJAAO MSVll-J MEMORY DIAG. 
DEFINE BASIC PDPll STUFF 
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SEQ 0099 



4117 

4118 

4119 

4120 

4121 

4122 

4123 

4124 

4125 

4126 

4127 

4128 

4129 

4130 

4131 

4132 

4133 

4134 

4135 

4136 

4137 

4138 

4139 

4140 

4141 

4142 

4143 

4144 

4145 

4146 

4147 

4148 

4149 

4150 

4151 

4152 

4153 

4154 

4155 

4156 

4157 

4158 

4159 

4160 

4161 

4162 

4163 

4164 

4165 

4166 

4167 

4168 

4169 

4170 

4171 

4172 

4173 



000200 
000100 
000040 
000020 
000010 
000004 
000002 
000001 



000004 
000010 



000020 
000024 
000030 
000034 
000060 



000114 
000114 

000250 



177746 
177750 

177754 
177766 



177572 
177574 
177576 
172516 



177600 



BIT7= 
BIT6= 
BIT5= 
BIT4- 
BIT3= 
BIT2- 
BIT1« 
BITO» 



200 

100 

40 

20 

10 

4 

2 

1 



;*BASIC "CPU" TRAP VECTOR ADDRESSES 



ERRVEC" 4 

RESVEC- 10 
TBITVEC«14 
TRTVEC' 14 
BPTVEC- 14 

IQTVEC" 20 

PURVEC= 24 

EMTVEC= 30 

TRAPVEC=34 

TKVEC= 60 

!TPVEC= 64 

!LI<VEC= 100 

CACHVEC=114 

PARVEC=CACHVEC 

;PIRQVEC=240 

MMVEC= 250 

.SBTTL DEFINE 

jMEMERR = 177744 

CONTRL = 177746 

MAINT = 177750 

iHITMIS = 177752 

DATARG = 177754 



TIME OUT AND OTHER ERRORS 
RESERVED AND ILLEGAL INSTRUCTIONS 
"T" BIT 

TRACE TRAP 
} {BREAKPOINT TRAP (BPT) 
INPUT/OUTPUT TRAP (IQT) **SCOPE** 
POUER FAIL 

EMULATOR TRAP (EMT) ♦♦ERROR** 
"TRAP" TRAP 
TTY KEYBOARD VECTOR 
TTY PRINTER VECTOR 
LINE CLOCK (KUll-L) VECTER 
CACHE ERROR INTERRUPT VECTOR 

;;PR0GRAM INTERRW>T REQUEST VECTOR 

MEMORY MANAGEMENT VECTOR 
CACHE REGISTERS 

[CACHE ERROR REGISTER 
! MEMORY CONTROL REGISTER 
; MEMORY MAINTENENCE REGISTER 
(HIT MISS REGISTER "1" IMPLIES HIT IN CACHE 
:DATA REGISTER 



.SBTTL DEFINE CPU REGISTERS 
CPUERR « 177766 ;jCPU ERROR REGISTER HOLDS CONDITION THAT CAUSED 

.SBTTL DEFINE MEMORY MANAGEMENT REGISTERS 

i*MEM0RY MANAGEMENT STATUS REGISTER ADDRESSES 
MMRO= 177572 
MMR1= 177574 
MMR2= 177576 
MMR3« 172516 

!«USER "I" PAGE DESCRIPTOR REGISTERS 
UIPDRO= 177600 

UIPDRl* 177602 

UIPDR2- 177604 

UIP0R3= 177606 

UIP0R4= 177610 

UIPDR5= 177612 

UIPDR6= 177614 

UIPDR7= 177616 

;*USER "D" PAGE DESCRIPTOR REGISTORS 
UDPDRO= 177620 
UDPDR1= 177622 
UDPDR2= 177624 
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DEFINE MEMORY MANAGEMENT REGISTERS 



4174 




;UDPDR3= 


177626 




4175 




;U0P0R4= 


177630 




4176 




;U0PDR5« 


177632 




4177 




;UDPDR6= 


177634 




A 1 

4178 




sU0P0R7« 


177636 




4179 










41 BO 




: *USER 


"I" PAGE ADDRESS REGISTERS 


4iel 


177640 FASTCITY-UIPARO 






4iec 


177640 UIPARO= 177640 




PATTERN PROGRAM SPACE 


A 1 ST 


177642 UIPAR1= 177642 




PATTERN PROGRAM SPACE 


A 1 


177644 UIPAR2« 177644 




PATTERN PROGRAM SPACE 


A 1 K 
4103 


177646 UIPAR3= 177646 




PATTERN PROGRAM SPACE 




177650 UIPAR4= 177650 




PATTERN PROGRAM SPACE 




177652 UIPAR5= 177652 




PATTERN PROGRAM SPACE 




177654 UIPAR6= 177654 




PATTERN PROGRAM SPACE 






;UIPAR7» 


177656 


J PATTERN PROGRAM SPACE 












A 1 0 1 




! *USER 


"D" PAGE ADDRESS REGISTERS 




177660 UDPARO= 177660 


i PATTERN PROGRAM SPACE 


A 1 OT 




;UDPAR1= 


177662 


; PATTERN PROGRAM SPACE 


A 1 OA 




;UDPAR2- 


177664 


: PATTERN PROGRAM SPACE 


OC 




;UDPAR3« 


177666 


i PATTERN PROGRAM SPACE 


A 1 0& 




;UDPAR4» 


177670 


; PATTERN PROGRAM SPACE 


A 1 07 




iU0PAR5= 


177672 


! PATTERN PROGRAM SPACE 






iU0PAR6« 


177674 


! PATTERN PROGRAM SPACE 


A 1 OQ 


177676 UDPAR7- 177676 


s PATTERN PROGRAM SPACE 
















:*SUPERVISOR "I" 


PAGE DESCRIPTOR REGISTERS 


4202 


172200 SIPORO- 172200 






4203 




SIP0R1= 


172202 








SIPDR2" 


172204 








SIPDR3= 


172206 








SIPDR4" 


172210 




AOf\l 




SIPDR5« 


172212 




4208 




SIPDR6- 


172214 




A 3 AO 
ASIA 




SIPDR7- 


172216 




4211 




j*SUPERVISOR "D" 


PAGE DESCRIPTOR REGISTERS 






SDPDRO* 


172220 




A31 T 




SDP0R1» 


172222 




AO\A 




S0P0R2« 


172224 




A3 1 C 




S0P0R3= 


172226 




A3 1 & 




S0PDR4- 


172230 




A31 7 




S0PDR5= 


172232 




A31 ■ 




S0PDR6- 


172234 




A31 O 




SDPDR7* 


172236 




A33A 










A331 




; ♦SUPERVISOR "I" 


PAGE ADDRESS REGISTERS 


A333 

4ccc 


172240 


SIPARO» 


171240 






jSIPARl» 


172242 




4224 


:SIPAR2» 


172244 




4225 


172246 


SIPAR3- 


172246 


;TEST AREA 


4226 


iSIPAR4>= 


172250 


:TEST AREA 


4227 


172252 


SIPAR5= 


172252 


:TEST AREA 


4228 


172254 


SIPAR6- 


172254 


jTEST AREA 


4229 


:SIPAR7» 


172256 




4230 











I<8 
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4231 

4232 

4233 

4234 

4235 

4236 

4237 

4238 

4239 

4240 

4241 

4242 

4243 

4244 

4245 

4246 

4247 

4248 

4249 

4250 

4251 

4252 

4253 

4254 

4255 

4256 

4257 

4258 

4259 

4260 

4261 

4262 

4263 

4264 

4265 

4266 

4267 

4268 

4269 

4270 

4271 

4272 

4273 

4274 

4275 

4276 

4277 

4278 

4279 

4280 



172260 



172272 
172274 
172276 



172300 



172340 



172350 
172352 
172354 



172360 



172374 
172376 



j*SUPERVISOR "D" 

SDPARO= 172260 

SDPAR1= 172262 

SDPAR2= 172264 

SDPAR3= 172266 

SDPAR4= 172270 

SDPAR5= 172272 

SDPAR6= 172274 

SDPAR7- 172276 



PAGE ADDRESS REGISTERS 



i*KERNEL "I" PAGE DESCRIPTOR REGISTERS 

KIPDRO- 172300 

KIPDR1= 172302 

KIPDR2* 1 ?2304 

KIPDR3= 172306 

KIPDR4- 172310 

KIPDR5* 172312 

KIPDR6- 172314 

KIPDR7- 172316 

{•KERNEL "D" PAGE DESCRIPTOR REGISTERS 

KDPDRO- 172320 

KDPDR1» 172322 

KDPDR2" 172324 

KDPDR3- 172326 

KDPDR4" 172330 

KDPDR5- 172332 

KDPDR6* 172334 

KDPDR7» 172336 

; •KERNEL "I" PAGE ADDRESS REGISTERS 

KIPARO- 172340 

KIPARl- 172342 

KIPAR2- 172344 

KIPAR3= 172346 

KIPAR4' 172350 

KIPAR5= 172352 

KIPAR6' 172354 

iKIPAR7« 172356 

;*KERNEL "D" PAGE ADDRESS REGISTERS 

KDPAR0= 172360 

KDPARl- 172362 

KDPAR2= 172364 

KDPAR3= 172366 

KDPAR4« 172370 

KDPAR5" 172372 

KDPAR6» 172374 

KDPAR7= 172376 



cvnjAAO nsvii j memory oiag. 

DEFINE Q-BUS MAP REGISTERS 
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SEQ 0102 



4283 

4284 

4285 

4286 

4287 

4288 

4269 

4290 

4291 

4292 

4293 

4294 

4295 

4296 

4297 

4298 

4299 

4300 

4301 

4302 

4303 

4304 

4305 

4306 

4307 

4308 

4309 

4310 

4311 

4312 

4313 

4314 

4315 

4316 

4317 

4318 

4319 

4320 

4321 

4322 

4323 

4324 

4325 

4326 

4327 

4328 

4329 

4330 

4331 

4332 

4333 

4334 

4335 

4336 

4337 

4338 

4339 



170200 
170202 
170204 



.SBTTL DEFINE Q-BUS MAP REGISTERS 

J ♦THE LOWER 16 BITS OF THE MAP REGISTERS ARE LABELED 'MAPLXX' 
:4'THE UPPER 6 BITS OF THE MAP REGISTERS ARE LABELED 'MAPHXX' 

MAPLO « 170200 

MAPHO = 170202 

MAPLl = 170204 

MAPHl ' 170206 

MAPL2 « 170210 

MAPH2 ' 170212 

MAPL3 = 170214 

MAPH3 - 170216 

MAPL4 = 170220 

MAPH4 » 170222 

MAPL5 = 170224 

MAPH5 - 170226 

MAPL6 = 170230 

MAPH6 - 170232 

MAPL7 ' 170234 

MAPH7 = 170236 

MAPLIO = 170240 

MAPHl 0 - 170242 

MAPLll ' 170244 

MAPHll « 170246 

MAPL12 ' 170250 

MAPH12 - 170252 

MAPLl 3 = 170254 

MAPH13 = 170256 

MAPL14 = 170260 

MAPH14 « 170262 

MAPL15 « 170264 

MAPH15 « 170266 

MAPL16 - 170270 

MAPH16 - 170272 

MAPLl 7 - 170274 

MAPH17 = 170276 

MAPL20 =■ 170300 

MAPH20 » 170302 

MAPL21 = 170304 

MAPH21 =« 170306 

MAPL22 ' 170310 

MAPH22 ' 170312 

MAPL23 - 170314 

MAPH23 ' 170316 

MAPL24 = 170320 

MAPH24 ' 170320 

MAPL25 = 170324 

MAPH25 = 170326 

MAPL26 = 170330 

MAPH26 = 170332 

MAPL27 = 170334 

MAPH27 = 170336 

MAPL30 = 170340 

MAPH30 ' 170342 

MAPL31 = 170344 

MAPH31 = 170346 

MAPL32 ' 170350 

MAPH32 = 170352 



CVMJAAO MSVll-J MEMORY OIAG. 
DEFINE 0-6US MAP REGISTERS 

4340 
4341 
4342 
4343 
4344 
4345 
4346 
4347 
434S 
4349 
4350 
4351 
4352 

4353 000174 

4354 000176 
4355 

4356 

4357 172100 

4358 

4359 

4360 060000 

4361 157776 

4362 040000 
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SEO 0103 



MAPL33 
MAPH33 
MAPL34 
MAPH34 
MAPL35 
MAPH35 
MAPL36 
MAPH36 
MAPL37 
MAPH37 



170354 
170356 
170360 
170362 
170364 
170366 
170370 
170372 
170374 
170376 



.SBTTL 
DISPREG-174 
SUREG- 176 

•SBTTL 
CSRADO= 172100 

.SBTTL 
FIRST »60000 
LAST-157776 
SIZE-40000 



DEFINE SOFTWARE SUITCH & DISPLAY REGISTERS 



DEFINE CONTROL STATUS REGISTERS 



DEFINE PARAMETERS 

; START OF THE 16K TEST PATTERN AREA 
;ENO OF THE 16K TEST PATTERN AREA 

sSIZE OF THE 16K TEST PATTERN AREA (FOR SOB INSTRUCTIONS) 



CVMJAAO MSVll-J MEMORY 0IA6, 
DEFINE PARAMETERS 

4365 

4366 

4367 

4368 

4369 

4370 

4371 

4372 

4373 

4374 

4375 

4376 

4377 

4378 

4379 

4380 

4381 

4382 

4383 

4384 

4385 

4386 

4387 

4388 

4389 

4390 

4391 

4392 

4393 

4394 

4395 

4396 

4397 

4398 

4399 

4400 

4401 
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SEQ 0104 



.LIST 
.SBTTL 



MO 

MACRO 



sBE NICE TO SEE MY DEFINITIONS 

FATAL 
FATAL 



FATAL IS USED TO REPORT FATAL ERRORS (ERRORS THAT PREVENT 
THE PROGRAM FROM CONTINUING). 



.MACRO FATAL ARG 

.NLIST 

.OSABL CRF 

,IIF DF LST** .LIST ME 

.ENABL CRF 

.LIST 

INC FATAL* 
ERROR «ARG 
.DSABL CRF 

.IIF OF LST** .NLIST ME 
.ENABL CRF 
,ENDM FATAL 



: ***MACRO***MACRO***MACRO*** 



;SET FATAL INDICATOR 



.SBTTL MACRO 

.MACRO TYPE 

.NLIST 

. DSABL CRF 

.IIF DF LSTIJ 

.ENABL CRF 

.LIST 

.IF B ARG 

TYPEIT 

.IFF 

TYPEIT ,ARG 
.ENDC 

.DSABL CRF 
.IIF DF LSTM 
.ENABL CRF 
.ENDM TYPE 



TYPE 
ARG 



.LIST ME 



.NLIST ME 



CvrijAAO MSVll-J MEMORr OIAG. 
MACRO NfUTST 

4404 

4405 

4406 

4407 

440a 

4409 

4410 

4411 

4412 

4413 

4414 

4415 

4416 

4417 

4416 

4419 

4420 

4421 

4422 

4423 

4424 

4425 

4426 

4427 

4420 

4429 

4430 

4431 

4432 

4433 

4434 

4435 

4436 

4437 

4438 

4439 

4440 

4441 

4442 

4443 

4444 

4445 

4446 

4447 

4448 

4449 

4450 

44S1 
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SEQ 0105 



.S8TTL MACRO NEUTST 
********************** NEUTST ********************** 

NEUTST IS USED AS THE FIRST INSTRUCTION OF A TEST. 
IT UILL: 

IJ GENERATE A TEST NUMBER FOR THE LABEL OF THIS TEST 

2) PUT STARS BEFORE AND AFTER A MESSAGE 

ARGUMENTS 

1) ASCII -- THIS IS THE MESSAGE THAT UILL APPEAR 

ON THE LISTING 

2) ICOUNT IF NON-BLANK AND BIT 11 OF ISUR - 1 IT UILL BE 

THE NUMBER OF ITERATIONS TO MAKE ON THIS TEST 

3) RETURN -- IF NON- BLANK UILL BE THE ADDRESS TO 

WHICH THE NEXT SCOPE STATEMENT UILL 
LOOP BACK TO. 

4) COMAND IF NON-BLANK UILL BE THE FIRST 

INSTRUCTION OF THE TEST 

IF BLANK SCOPE UILL BE THE 

FIRST INSTRUCTION 
*******«********•••••••••**••*•**••••******•********• 

.MACRO NEUTST ASCII .ICOUNT. RETURN. COMANO 
JSTN»1 
<NUTST-0 
.NLIST MC 
.IF B < COMAND > 
$$NEUTEST 
.IFF 

♦♦NEUTEST 
.ENDC 
.NLIST 
.LIST ME 
.LIST 

.IF NE 400061 SUR 
.IF NB ICOUNT 
.IF LE <IC0UNT-1> 
MOV #1.$ TIMES 
.IFF 

MOV OICOUNT.ITIMES 

.ENDC 
.ENDC 

.IF m RETURN 
MOV «RETURN,$LPADR 

.ENDC 
.ENDC 
.NLIST 
.LIST MC 
.LIST 

.NLIST ME 
.tNDM NEUTST 



\*TN.<ASCII>. SCOPE 
\$TN.< ASCII >.< COMANO > 



:iDO 1 ITERATION 

;:0Q ICOUNT ITERATIONS 

ssSET SCOPE LOOP ADDRESS 



C9 



CVMJAAO MSVll-J MEMORY OIAG. 
MACRO UNEUTEST 

4454 

4455 

4456 

4457 

4458 

4459 

4460 

4461 

4462 

4463 

4464 

4465 

4466 

4467 

4466 

4469 

4470 

4471 

4472 

4473 

4474 

4475 

4476 

4477 

4478 

4479 

4480 

4481 

4482 

4483 

4484 

4485 

4486 

4487 

4488 

4489 

4490 

4491 

4492 

4493 

4494 

4495 

4496 

4497 

4498 

449C 

4500 

4501 

4502 

4503 

4504 

4505 

4506 



SEQ 0106 
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.SBTTL MACRO $$NeUTEST 

.MACRO $»NEUTEST A.ASC.COMND 

.IRP ASCI.<ASC> 

.IF EQ $NUTST 

»NUTST=1 

.SBTTL T'A' ASCI 

.NLIST 

.LIST ME 

.LIST 

s*TEST A ASCI 
.IFF 
ASCI 
.ENDC 
.ENDM 

TST'A: COMND 

.NLIST ME 

$TN-$TN*1 

.ENDM $$NEUTEST 

.SBTTL MACRO SUBTST 
************** SUBTST ******************************* 

THIS MACRO WILL FORMAT A SUBTEST HEADING WITH STARS 
A .SBTTL WILL BE FORCED £ .NLISTED FOR THE TABLE OF CONTENTS. 

ARGUMENT : 

1) TXT -- THIS IS THE MESSAGE THAT WILL APPEAR IN THE TABLE OF CONTENTS £ LISTING. 

EXAMPLE: SUBTST <<THIS IS A FUN SUBTST>> 

******************************************************* 

.MACRO SUBTST ASCII 
.NLIST MC 
*SUBTST <ASCII> 
.LIST MC 
.ENDM SUBTST 

.SBTTL MACRO JSUBTST 

.MACRO $SUBTST ASC 

.IRP ASCI.<ASC> 

.SBTTL ASCI 
.NLIST 

.LIST ME 
.LIST 

; ******************************************************************************* 

; ♦SUBTEST ASCI 
.ENDM 

• **********,********************************************************************* 

.NLIST ME 
.ENDM $SUBTST 



CVMJAAO MSVll-J MEMORY OIAG. 
MACRO TYPOCT 
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SEO 0107 





^RTTI HArPD TVPnrT 




> AAA TYPOCT A A A A A A A A * A A A A A A A A A A A 












TO A 6 OTGIT OCTAL NUMBFR AND TYPF TT 






4S1S 


ARGUHFNT^i • 






4517 


1 1 NUM THT NUMBFR TO RF TYPFO 








?1 RFMARK ALLQUS A COMMFNT TO BF MADF 


4520 






ROUTTNFS RFOUTRFO 






4523 


1) CONVERT BINARY TO OCTAL AND TYPE f JTYPQCT ) 


4524 






45P6 




4527 


EXAMPLES • 


452A 




4529 


1) TYPOCT HILMT <TYPES THE CONTENTS OF HILMT> 


4530 


25 TYPOCT #5 <TYPES ' 000005' > 


4531 




4532 




4533 




4534 


.MACRO TYPOCT NUM, REMARK 


4535 

■t J J J 


NLIST 


4536 


OSABL CRF 


4S57 


IIF OF LST** LIST ME 




ENABL CRF 


4539 


.LIST 


4540 


MOV NUM.-(SP) !;SAVE NUM FOR TYPEOUT 


4541 


.IIF NB <REMARK>. 

TYPOC sjGO TYPE- -OCTAL ASCIKALL 


4542 


4543 


.OSABL CRF 


4544 


.IIF OF LSTJ* .NLIST ME 


4545 


.ENABL CRF 


4546 


.ENDM TYPOCT 



CVMJAAO MSVll-J MEMORY DIAG. 
MACRO TYPOCS 

4549 

4550 

4551 

4552 

4553 

4554 

4555 

4556 

4557 

4558 

4559 

4560 

4561 

4562 

4563 

4564 

4565 

4566 

4567 

4566 

4569 

4570 

4571 

4572 

4573 

4574 

4575 

4576 

4577 

4578 

4579 

4580 

4581 

4582 

4583 

4584 

4585 

4586 

4587 

4588 

4589 

4590 

4591 

4592 

4593 

4594 

4595 

4596 

4597 

4598 

4599 

4600 

4601 

4602 
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SEQ 0106 



.SBTTL MACRO TYPOCS 

TYPOCS ******************** 

TYPOCS IS USED TO CHANGE A BINARY NUMBER TO AN OCTAL 
NUWER AND TYPE 1 TO 6 DIGITS 
WITH OR WITHOUT LEADING ZEROS. 

ARGUMENTS: 

1) NUM NUMBER TO BE TYPED 

2) REMARK ALLOWS A COMMENT TO BE MADE 

3) N NUMBER OF DIGITS (1 TO 6) TO BE TYPED 

4) Z BLANK-SUPPRESS LEADING ZEROS (TYPES SPACES) 

NON- BLANK -TYPE LEADING ZEROS 

ROUTINES REQUIRED 

1) CONVERT BINARY TO OCTAL AND TYPE (.^TYPOCT) 

2) TYPE AN ASCIZ STRING (.JTyPE) 
EXAMPLES: 

1) TYPOCS «12345.<TYPES "5">.l 

2) TYPOCS 0004. < TYPES "04">.2.X 

3) TYPOCS 0004. < TYPES » 4">.2 

tt************************************************************** 

.MACRO TYPOCS NUM , REMARK . N . Z 

.NLIST 

. DSABL CRF 

.IIP DF LST$$ .LIST ME 
.ENABL CRF 
.LIST 

MOV NUM.-(SP) 

.IIF NB < REMARK >, REMARK 
TYPOS 
.IF NB N 
.BYTE N 
.IFF 

.BYTE 6 
.ENDC 
.IF NB Z 
.BYTE 1 
• IFF 

.BYTE 0 
.ENDC 

.DSABL CRF 

.IIF DF LST$$ .NLIST ME 
.ENABL CRF 
.ENDM TYPOCS 



jSAVE NUM FOR TYPEOUT 
;G0 TYPE- -OCTAL ASCII 
;TYPE N DIGIT(S) 
sTYPE 6 DIGITS 

:;TYPE LEADING ZEROS 

;: SUPPRESS LEADING ZEROS 



cvMjAAO nsvii-j ncnoRY oiag. 

MACRO TYPOEC 

4605 

4606 

4607 

4606 

4609 

4610 

4611 

4612 

4613 

4614 

4615 

4616 

4617 

4618 

4619 

4620 

4621 

4622 

4623 

4624 

4625 

4626 

4627 

4628 

4629 

4630 

4631 

4632 

4633 

4634 

4635 

4636 

4637 

4638 

4639 

4640 

4641 

4642 

4643 

4644 

4645 
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SEQ 0109 



.SBTTL MACRO TYPOEC 
******************** TYPOEC ******************** 

TYPOEC IS USE TO CHANGE A BINARY NUMBER TO A SIGNED 

DECIMAL NUMBER AND TYPE IT REPLACING LEADING ZERO 
WITH SPACES 

NOTE: IF THE NUMBER IS NEGATIVE A 
MINUS SIGN WILL BE TYPED. 

ARGUMENTS: 

1) NUM NUMBER TO BE TYPED 

2) REMARK ALLOWS A COMMENT TO BE MADE 
ROUTINES REQUIRED 

1) CONVERT BINARY TO DECIMAL AND TYPE CITYPDEC) 

2) TYPE AN ASCIZ STRING (.HYPE) 
EXAMPLES 

1) TYPDEC SIZE. < TYPE THE CONTENTS OF SIZE> 

2) TYPDEC #-10..<TYPE A MINUS TEN> 

*************************************ttttt*^^t****************** 

.MACRO TYPDEC NUM. REMARK 

.NLIST 

.OSABL CRF 

.IIF DF LSI a .LIST ME 

. ENABL CRF 

.LIST 

MOV NUM.-(SP) ;:SflVE NUM FOR TYPFOUT 

.IIF NB <REMARK>. REMARK 
TYPOS : :G0 TYPE -DECIMAL ASCII WITH SIGN 

.OSABL CRF 

,IIF DF LSTJ* .NLIST ME 

. ENABL CRF 

.ENOM TYPDEC 



CVMJAAO MSVll-J ^«MORY DIAG. 

MACRO Bnov 

4647 

4648 

4649 

4650 

4651 

4652 

4653 

4654 

4655 

4656 

4657 

4658 

4659 

4660 

4661 

4662 

4663 

4664 

4665 

4666 

4667 

4668 

4669 

4670 

4671 

4672 

4673 

4674 

4675 

4676 

4677 

4678 

4679 

4680 

4681 

4682 

4683 

4684 

4685 

4686 

4687 

4688 

4689 

4690 

4691 

4692 

4693 

4694 

4695 

4696 

4697 

4698 

4699 

4700 

4701 

4702 

4703 
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SEQ 0110 



.SBTTL MACRO BMOV 
***************** BMOV *************************** 

THIS MACRO MOVES A BLOCK OF DATA, 

AP6UEMENTS: 



1) 
2) 

3) 



FROMHERE 
TOHERE 

SIZE 



THE FIRST ADDRESS OF THE SOURCE BLOCK. 

THE FIRST ADDRESS OF THE DESTINATION BLOCK. 

IF BLANK THE 1ST ADDRESS OF THE USER INSTRUCTION 

PAR'S IS USED (FASTCITY). 

THE SIZE OF THE SOURCE BLOCK. 

IF BLANK A 16 WORD TRANSFER IS ASSUMED. 

"UHY DEFAULT TO 16 U0RDS7" YOU ASK! 

"BECAUSE THAT'S HOU MANY WORDS TO THE USER PAR 

REGISTERS & THAT'S WHERE I INTEND TO MOVE LOTS 

OF STUFF." I REPLY! 



************************************************** 

.MACRO BMOV FROMHERE, TOHERE, SIZE 
.IF B TOHERE 
.NLIST 

.DSABL CRF 

.IIF OF LST$$ .LIST ME 

.ENABL CRF 

.LIST 

JSR R5.BL0CK1 
FROMHERE 
.DSABL CRF 
.IIF OF LST*J .NLIST ME 
.ENABL CRF 
.MEXIT 
.ENDC 

.IF B SIZE 
.NLIST 

.DSABL CRF 

.IIF OF LSTM .LIST ME 

.ENABL CRF 

.LIST 

JSR R5.BL0CK2 
TOHERE 
FROMHERE 
. DSABL CRF 
.IIF OF LSlii .NLIST ME 
.ENABL CRF 
.MEXIT 
.IFF 
.NLIST 

.DSABL CRF 

.IIF OF LST$* .LIST ME 

. ENABL CRF 

.LIST 

JSR R5.BL0CK3 
SIZE 



CVMJAAO MSVll-J r€MORY DIAG. 
MACRO BHOV 

4704 
4705 
4706 
4707 
4708 
4709 
4710 
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TOHERE 
FROMHERE 
.DSABL CRF 
.IIF OF LSTM .NLIST ME 
.ENABL CRF 
.ENDC 
.ENDM BMOV 



SEQ 0111 

I 



CVMJAAO MSVll-J MEMORY OIAG. 
MACRO MAP 

4713 

4714 

4715 

4716 

4717 

4718 

4719 

4720 

4721 

4722 

4723 

4724 

4725 

4726 

4727 

4728 

4729 

4730 

4731 

4732 

4733 

4734 

4735 

4736 

4737 

4738 

4739 

4740 

4741 

4742 

4743 

4744 

4745 

4746 

4747 

4748 

4749 
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SEQ 0112 



.SBTTL MACRO MAP 
***************** MAP **************************** 

THIS MACRO MAPS A MFMORY BANK (16K) INTO THE 

TEST PATTERN AREA (SUPERVISOR VIRTUAL (60000-157777)). 



ARGUEMENTS: 
1 ) BANK 



THE BANK OF 16K WORDS TO BE MAPPED. 
THERE ARE 120 BANKS OF 16K WORDS 



EXAMPLES 

MAP LOG ! LOCATION "LOG" CONTAINS THE OF THE BANK TO MAP 

MAP #28. jBANK 34 (OCTAL) WILL BE MAPPED 

************************************************** 

BANK 



MAP 
R3 



.MACRO 
PUSH 
.NLIST 
.OSABL CRF 

.IIF OF LST** .LIST ME 

.ENABL CRF 

.LIST 

.IF B BANK 

MOV #200, R3 

.IFF 

MOV BANK.R3 
.ENDC 

CALL MAPPER 
.DSABL CRF 

.IIF OF LST** .NLIST ME 
. ENABL CRF 
POP R3 
.ENOM MAP 



CVMJAAO MSVll-J MEMORY OI*G. 
MACRO SUPERVISOR 

4752 

4753 

4754 

4755 

4756 

4757 

4758 

4759 

4760 

4761 

4762 

4763 

4764 

4765 

4766 

4767 

4766 

4769 

4770 

4771 

4772 

4773 

4774 

4775 

4776 

4777 

4 778 

4779 

4780 

4781 

4782 

4783 

4784 

4785 

4786 

4787 

4788 

4789 

4790 

4791 

4792 

4793 
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SEQ 0113 



.SBTTL MACRO SUPERVISOR 
***************** SUPERVISOR ********************* 

THIS MACRO SWITCHES TO SUPERVISOR MODE. 

ARGUEMENTS: NONE. 

************************************************** 



.MACRO SUPERVISOR 

•NLIST 

.DSABL CRF 

.IIF OF LST$$ .LIST ME 

.ENABL CRF 

.LIST 

BIS #BIT14.PSU 

.DSA[,L CRF 

.IIF OF LST** .NLIST ME 

. ENABL CRF 

.ENOM SUPERVISOR 



sGO TO SUPERVISOR MODE 



.SBTTL MACRO USER 
***************** USER *************************** 

THIS MACRO SWITCHES TO USER MODE. 

ARGUEMENTS: NONE. 

*********************************t*********t****** 



.MACRO USER 
.NLIST 
.DSABL CRF 

• IIF OF LSTM .LIST ME 

.ENABL CRF 

.LIST 

BIS «BIT15!BIT14.PSW 
.DSABL CRF 

.IIF OF LST$< .NLIST ME 
.ENABL CRF 
.ENOM USER 



:G0 TO USER MODE 



CVMJAAO nSVll-J MEMORY OIAG. 
MACRO TESTAREA 

4795 

4796 

4797 

4798 

4799 

4800 

4801 

4802 

4803 

4804 

4805 

4806 

4807 

4808 

4809 

4810 

4811 

4812 

4813 

4814 
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SEQ 0114 



.SBTTL MACRO TESTAREA 
***************** TESTAREA *********************** 

THIS MACRO SWITCHES TO THE SPECIFIED TEST MODE. 

ARGUEMENTS: NONE. 

************************************************** 



.MACRO TESTAREA 

.NLIST 

.DSABL CRF 

.IIF OF LST*$ .LIST ME 

.ENABL CRF 

.LIST 

BIS TESTMODE.PSW 
.DSABL CRF 

.IIF DF LST** .NLIST ME 
. ENABL CRF 
.ENDM TESTAREA 



iGO TO SYSTEM TEST MODE 



CVMJAAO MS VI -J MEMORY DIAG. 
MACRO SET4 (, RES4 

4817 

4S18 

4819 

4820 

4821 

4822 

4823 

4824 

4825 

4826 

4827 

4828 

4829 

4830 

4831 

4832 

4833 

4834 
4835 
4836 
4837 
4838 
4839 
4840 
4841 
4842 
4843 
4844 
4845 
4846 
4847 
4848 
4849 
4850 
4851 
4852 
4853 
4854 
4855 
4856 
4857 
4858 
4859 
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.SBTTL MACRO SET4 t RES4 
***************** SET4 L RES4 ******************** 

THESE MACROS SET £ RESTORE VECTOR 4( TIMEOUT TRAP) 

IN IT'S RESTORED MODE TRAPS ARE REPORTED AS SUCH. 

ARGUEMENTS: LOC {THE LOCATION TO VECTOR TO (ONLY USED IN "SET4" NOT "RES4' ) 

I USE THE SET4 AND RES4 MACROS AROUND CODE THAT I EXPECT TO TRAP TO 4 
LIKE LOOKING FOR ALL POSSIBLE CSR'S AND ETC. WHENEVER CODE IS NOT 
SURROUNDED BY SET4 AND RES4 THEN ANY TRAPS TO 4 WILL CAUSE AN ERROR 
PRINTOUT THAT SAYS "UNEXPFCTED TRAP TO 4" AND ALL THE ASSOCIATED REGISTER JUNK 
************************************************** 



SEQ 0115 



ARG 

.LIST 



101$: 



.MACRO SET4 
.NLIST 
. DSABL CRF 
IIF OF LST$$ 
. ENABL CRF 
• LIST 

MOV ARG. 4 

.DSABL CRF 

.IIF DF LST$$ .NLIST 

.ENABL CRF 

. ENDM SET4 

. MACRO RES4 
.NLIST 
.DSABL CRF 
.IIF DF LST$$ .LIST 
.ENABL CRF 
.LIST 
MOV 
CMP 
BNE 
CLR 



ME 



ME 



ME 



#TIME0UT,4 
OS.PROTYP 
101$ 
CPUERR 



.DSABL CRF 

.IIF DF LST$$ .NLIST 

.ENABL CRF 

.ENDM RES4 



IS THIS AN 11/83/84 ? 
BRANCH IF NOT 

CLEAR OUT THE CPU ERROR REGISTER BITS 
{THAT A EXPECTED TRAP COULD HAVE SET 



ME 



CVMJ/»AO MSVll-J MEMOftY DIA6. 
MACRO OLEFT 

4862 

4863 

4864 

4865 

4866 

4867 

4868 

4869 

4870 

4871 

4872 

4873 

4874 

4875 

4876 

4877 

4878 

4879 

4880 

4881 

4882 

4883 

4884 

4885 

4886 

4887 

4888 000000 105737 056732 

4889 000004 001420 

4890 000006 013737 003706 

4891 000014 013737 003710 

4892 000022 104042 

4893 000024 012760 177777 

4894 000032 013700 000042 

4895 000036 005037 000042 

4896 000042 000137 014042 

4897 000046 000207 
4896 

4899 
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SEQ 0116 



.SBTTL MACRO DLEFT 
***************** OLEFT ************************** 

THIS MACRO DOES A DOUBLE UORD LEFT SHIFT 

ARGUEMENTS: LOC :THE LOCATION TO BE SHIFTED LEFT (CARRY TO L0C»2) 

************************************************** 

.MACRO DLEFT ARG 

•NLIST 

.DSABL CRF 

.IIF DF LSTM .LIST ME 
.ENABL CRF 



.LIST 
ROL 
ROL 
.DSABL 



ARG 
ARG«2 
CRF 



.IIF DF LSTM 
.ENABL CRF 
,EN0M OLEFT 
.NLIST MO 



.NLIST ME 



: DON'T NEED TO SEE THEM ANY MORE 

; ********************************************** 

.SBTTL ABORT ROUTINE FOR ORION UFD MODE (VMK) 
• ********************************************** 



000030 
000032 

000042 



ABORT : TSTB 
BEQ 
MOV 
MOV 
EMT 
MOV 

ABORT 1: MOV 
CLR 
JMP 

AB0RT2: RTS 



)0DU7 

AB0RT2 

SAV30,30 

SAV32.32 

♦42 

0-1.42(R0) 
42, RO 
42 

^ENOAO 
PC 



TEST FOR USER FRIENDLY MODE 

IF NOT UFD THEN CONTINUE NORMAL OPERATION 

RESTORE EMT LOCATION (30) 

RESTORE EMT PRIORITY LOCATION (32) 

GET OCA LOCATION INTO RO FROM MONITOR 

SET A -1 INTO LOCATION DRSERR IN MONITOR 

AND PUT THE MONITOR RETURN ADDRESS IN RO 

CLEAR MONITOR RETURN FLAG 

RETURN TO MONITOR 00 NOT PUSH STACK HERE 

IF NOTUFO RETURN TO MAINLINE 



cvMjAAO Msvii-j rierioRY diag. 

TRAP CATCHER 
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4902 

4903 

4904 

4905 

4909 

4910 

4911 

4912 

4913 

4914 

4915 

4916 

4917 

4918 

4919 

4920 

4921 

4922 

4923 

4924 

4925 

4926 

4927 

4928 

4929 

4930 

4931 

4932 

4933 

4934 

4935 

4936 

4937 

4938 

4939 

4940 

4941 

4942 

4943 
4944 



000000 



000046 
000052 

000024 

000042 

000044 

000200 
000202 

000300 
000304 
000310 
000310 
000316 



000000 
000000 
000177 



000046 
014042 
000052 
000020 

000024 
000200 
000042 
002000 
000044 
056750 
000200 
000437 
000442 
000300 
005037 
000137 

012737 
000137 
002000 



Sn 0117 



000000 



.SBTTL 
.'0 
.WORD 
.REPT 



TRAP CATCHER 

0.0 

177 



.UCRD .«2,HALT 



SBTTL ACTll HOOKS 
THE HOOKS REQUIRED BY ACTll ARE DEFINED AND SETUP BELOU: 
DEFINITIONS: 

1) L0C.46 "END OF-PASS" HOOK 

'ADDRESS OF END OF PASS ROUTINE 
MODIFIED BY ACTll. 

2) L0C.52 PROGRAM NEEDS HOOK 

BIT 15=1 PROGRAM SHOULD BE POWER 
FAILED WHILE RUNNING 
»0 NO POWER FAIL 
BIT 14-1 PROGRAM MEMORY SIZE DEPENDENT 

«0 NOT MEMORY SIZE DEPENDENT 
BIT 13-1 PROGRAM REQUIRES MANUAL INTERVENTION 

-0 MANUAL INTERVENTION NOT PEQUIRED 
BITS 12-0 MUST BE ZERO'S 



.-46 
$ END AD 
.-52 
.WORD 
.SBTTL 
.-24 
200 
,-42 
STACK 
. «44 



:;1)SET L0C.46 TO ADDRESS OF $ENDAD IN . $E0P 
;;2)SET L0C.52 TO INDICATE MEMORY SIZE DEPENDANT 



BIT4 

APTll HOOKS 

;!SET POWER FAIL TO POINT TO START OF PROGRAM 
;;FOR APT START UP 



002626 
003670 

177777 
003670 



002626 



STARTS: BR 
BR 

.-300 
STARTl: CLR 
JMP 

START2: SET 
JMP 

.-STACK 



sSO RTll CAN START WITH RUN COMMAND 
POINT TO APT INDIRECT ADDRESS PNTR. 
$APTH0R sjPOINT TO APT HEADER BLOCK 
.-200 

STARTl ; "NORMAL" START 

START2 : RESTART (SAVE ERROR ACCOUNTING) 



RESTART 

START 

RESTART 

START 



MOV #-1. RESTART 
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4947 






.S8TTL 


VAR 


4948 




.-♦THIS 


TABLE CONTAI 


4949 




:*USED 
♦cm AG: 


IN THE PROGR 


4950 002000 








4951 002000 


000000 


UFDSET : 


0 




4952 002002 

4953 002004 


000000 


SEl ONLY 


:0 




000000 


OIAGFLAGrO 




4954 002006 


000000 


KAMIKAZE :0 




4955 002010 


000000 


SKIPKAMI:0 




4956 




:NEXT TWO BYTES 


ARE 


4957 002012 


000 


♦PATMAR 


: .BYTE 


0 


4958 002013 


000 


♦BANK: 


.BYTE 


0 


4959 002014 


000 


♦ERFLG: 


.BYTE 


0 


4960 002015 


000 


♦ITEMS: 


.BYTE 


0 


4961 002016 


000000 


LASTERROR:.UORO 


0 


4962 002020 


000000 


ERRPC: 


.UORO 


0 


4963 002022 


000000 


BADPC: 


.UORD 


0 


4964 002024 


000000 


ERRSP: 


.UORD 


0 


4965 002026 


000000 


BADSP: 


.UORD 


0 


4966 002030 


000000 


ERRPSU: 


.UORD 


0 


4967 002032 


000000 


BAOPSU: 


.UORD 


0 


4968 002034 


000000 


ADDRESS 


:.U0RD 


0 


4969 002036 


000000 


PADDRESS:.UORD 


0 


4970 002040 


000000 000000 


PHY ADD: 


.UORD 


0.0 


4971 002044 


000000 


GOOD: 


.UORD 


0 


4972 002046 


000000 


G00D2: 


.UORD 


0 


4973 002050 


000000 


G00D3: 


.UORD 


0 


4974 002052 


000000 


BAD: 


.WORD 


0 


4975 002054 


000000 


BAD2: 


.UORD 


0 


4976 002056 


000000 


BAD3: 


.UORD 


0 


4977 002060 


000000 


BADXOR: 


.UORD 


0 


4978 002062 


000000 


♦AUTO: 


.UORD 


0 


4979 002064 


000000 


FATAL^: 


.UORD 


0 


4980 002066 


000000 


SKPERR: 


.UORD 


0 


4981 002070 


000000 


NEMCNT : 


0 




4982 002072 


000000 


PARCNT : 


0 




4983 0020/4 


000000 


PATERR: 


0 




4984 002076 


000000 


NOPAR : 


0 




4985 002100 


000000 


NONEM: 


0 




4986 002102 


000000 


BANK: 


0 




4987 002104 


000000 


BANKINDEX:0 




4988 002106 


000000 


CPU8IT: 


0 




4989 002110 


000000 


MUT: 


0 




4990 002112 


000000 


PAT TERN :0 




4991 002114 


000000 


KPFLAG: 


.WORD 


0 


4992 002116 


ooooco 


ACFLAG: 


.UORD 


0 


4993 002120 


000000 


MKFLAG: 


.UORD 


0 


4994 002122 


000000 


PFLAG: 


.UORD 


0 


4995 002124 


000000 


RRFLAG: 


.UORD 


0 


4996 002126 


000000 


RLFLAG: 


.UORD 


0 


4997 002130 


000000 


BMFLAG: 


.UORD 


0 


4998 002132 


000000 


EQFLAG: 


.UORD 


0 


4999 002134 


000000 


TMFLAG: 


.UORD 


0 


5000 002136 


000000 


INTFLAG 


: .UORD 


0 


5001 002140 


000000 


INT64K: 


.UORO 


0 


5002 002142 


000000 


PMEMFLG 


■ . UORD 


0 


5003 002144 


000000 


ABORTFLAG: .WORD 


0 



INITIALIZED TO ZERO 
COMMON STORAGE LOCATIONS 



; START OF COmON TAGS 
:USER FRIENDLY FLAG 

; SELECT ONLY BANKS MARKED BY FIELD SERVICE MODE FLAG 
iSET FOR SHIFTING DIAGONAL TEST 
iSET FOR KAMIKAZE MODE TESTING 
sUSED TO SKIP RESTORING KAMIKAZE MODE WHEN MODIFIED 
IN THE DISPLAY REGISTER 
! PATTERN NUMBER 
:BANK L SIGN 
{CONTAINS ERROR FLAG 
{CONTAINS ITEM CONTROL BYTE 
i NUMBER OF ERRORS ON LAST PASS 
(CONTAINS PC OF ERROR FOR TYPEOUT 
; CONTAINS PC OF ERROR 
i CONTAINS SP OF ERROR FOR TYPEOUT 
; CONTAINS SP OF ERROR 
[CONTAINS PSU OF ERROR FOR TYPEOUT 
! CONTAINS PSU OF ERROR 
{CONTAINS ADDRESS OF 'BAD' DATA 
;ADDRESS,OF PARITY ERROR 
;22 BIT |i>HYSICAL ADDRESS 
{CONTAINS 'GOOD' DATA 
{CONTAINS 'G00D2' DATA 
'GOODS' DATA 
'BAD' DATA 
'BAD2' DATA 
'BAD3' DATA 
;XOR OF GOOD £ BAD « BAD BITS! 
{AUTOMATIC MODE INDICATOR FOR APT. ACT. £ XXDP 
I FATAL ERROR INDICATOR 

[USED TO SKIP ERROR MESSAGE IN "♦ERRGEN" 
[NON-EXISTANT MEMORY COUNTER (HOLES) 
(PARITY ERROR COUNTER 
[PATTERN ERROR COUNTER 
[NO PARITY ERROR MODE INDICATOR 
[NO NON-EXISTANT MEMORY (HOLES) MODE INDICATOR 
[MEMORY BANK UNDER TEST 
(USED TO INDEX INTO CONFIG TABLE 

[CONTAINS 1 BIT TO IDENTIFY CPU TO CONFIGURATION TABLE 
[MEMORY UNDER TEST FLAG 
[PATTERN NUMBER UNDER TEST 
[BANK IS PROTECTED RLGION OF ECC 
[BANK CAN BE ACCESSED BY THIS CPU 

;IF SET INDICATES MSVll-J OR MFllS-K UNDER TEST««««»«m 
[BANK IS IN PROGRAM SPACE 

[BANK IS UHERE PROGRAM RELOCATION IS REQUIRED TO TEST 
{PROGRAM IS RELOCATED FLAG 
"BANK IS IDENTIFIED AS BAD MEMORY' FLAG 
"BANK HAS EQB MEMORY" FLAG 

"TYPE OF MEMORY TO TEST" FLAG; 0 • PARITY. 1 • ECC 
"BANK IS INTERLEAVED" FLK**************************** 
"BANK IS 64K INTERLEAVED' FLAG*«*««*«***«*****«***«**« 

"MEMORY UNDER TEST IS A MSVll-J" FLAG 
"ABORT OCCURED' FLAG 



{CONTAINS 
{CONTAINS 
{CONTAINS 
{CONTAINS 
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VARIABLES INITIALIZED TO ZERO 



CIO 

:10 Pag« 



128-1 



SEQ 0119 



5004 

5005 

5006 

5007 

5000 

5009 

5010 

5011 

5012 

5013 

5014 

5015 

5016 

5017 

5018 

5019 

5020 

5021 

5022 

5023 

5024 

5025 

5026 

5027 

5028 

5029 

5030 

5031 

5032 

5033 

5034 

5035 

5036 

5037 

5038 

5039 

5040 

5041 

5042 

5043 

5044 

5045 

5046 

5047 

5048 

5049 

5050 

5051 

S0S2 

S0S3 

S0S4 

5055 

5056 

5057 

5058 

5059 

5060 



002146 000000 

002150 000000 

002152 000000 

002154 000000 

002156 000000 

002160 000000 

002162 000000 

002164 000000 

002166 000000 

002170 000000 

002172 000000 

002174 000000 

002176 000000 

002200 000000 

002202 000000 

002204 000000 

002206 000000 

002210 000000 

002212 000000 

002214 000000 

002216 000000 

002220 000000 

002222 000000 

002224 000000 

002226 000000 

002230 000000 

002232 000000 

002234 000000 

002236 000000 

002240 000000 

002242 000000 000000 

002246 000000 000000 

002252 000000 000000 

002256 000000 000000 

002262 000000 

002264 000 

002265 000 

002266 000000 
002270 000000 
002272 000000 
002274 000000 
002276 000000 
002300 000000 
002302 000000 
002304 000000 
002306 000000 
002310 000000 
002312 000000 
002314 000000 
002316 000000 
002320 000000 
002322 000000 
002324 000000 
002326 000000 



CTLKVEC: .WORD 0 
CSR: .UORO 0 
CSRNO: 0 
SAVCSR: .UORO 0 
OLDCSR: .UORO 0 

; THESE LOCATIONS STORE 
SUPDRO: 0 
SUPDRl: 0 
SUPDR2: 0 
SUP0R3: 0 
SUPDR4: 0 
SUPDR5: 0 
SUPDR6: 0 
DUMMY : 0 

: THESE LOCATIONS STORE GPR'S L 

DETRO: 0 

DETRl: 0 

DETR2: 0 

DETR3: 0 

DETR4: 0 

DETR5: 0 

DETSP: 0 

DETPSU: 0 

DETFLAG:0 

C0NTFLAG:0 

TOTCSRS.-.UORD 0 



HOLDS OLD KERNAL STACK POINTER IN CASE OF CNTL/K 
iDATA TO OR FROM CSR 
CSR ADDRESS NUMBER (4 LSB'S) 
LOCATION TO SAVE CSRNO DURING FS COMMAND 
J OLD CSR NUMBERCUSED IN INH PTR TEST) 
GPR'S DURING SUPERVISOR TESTS 



CSRFIRST 
CSRLAST: 
CSRFBANK: 
CSRLBANK; 
CSRINT: 
SPLTCSR: 
DATBUF 
TSTDAT 
SBEMSK 
DBEMSK 
SUPDOADD 
PASFLG 
UPPFLG 
PASSNO: 
SAV4: 
SAVPAR 
SAVMON; 
MONFLG 
REALPAT : 
OLDCACHE 
PARTHERE 
FSSTACK: 
NEUBANK: 
SOURCE: 
CHECK: 
CBITS: 
MASK: 
CSRIS: 
BITNO: 
PCBUMP: 



.UORO 

.UORO 

.UORO 

.UORO 

.UORD 

.UORO 

UORD 

UORD 

UORD 

UORD 

.UORD 

BYTE 

BYTE 

UORD 

UORD 

UORD 

UORD 

UORD 

UORD 

.UORD 

.UORD 

UORO 

UORD 

UORD 

UORD 

UORD 

UORD 

UORO 

UORO 

UORD 



0 
0 
0 
0 
0 
0 

0.0 

0.0 

0.0 

0.0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 



i DUMMY LOCATION FOR ADDRESS PASSING 
PSU DURING DETAILED ERROR PRINTOUTS 



DETAILED REPORT FLAG 

CSR'S HAVE BEEN TESTED FLAG 

1 BIT PER EXISTING CSR. EG- 

CSR 0 REPRESENTED BY BIT 15. ETC. 

FIRST ADDRESS UNDER CONTROL OF THIS CSR 



TUO UORD DATA BUFFER 

TUO UORD TEST DATA 

TUO UORD SINGLE BIT ERROR MASK 

TUO UORO DOUBLE BIT ERROR MASK 

ADDRESS OF SUBROUTINE TO EXECUTE IN SUPERVISOR MODE 
LOCAL LOOP PASS CONTROL 
LOCAL LOOP PASS CONTROL 
LOCAL LOOP PASS CONTROL 

USED TO SAVE KERNAL PAR 5 ssI.L.CiREV 
USED TO SAVE KERNAL PAR 5 
XXDP MONITOR RETURN ADDRESS 
RETURN TO MONITOR FLAG 
REAL PATTERN UNDER TEST 

BACKED UP VALUE OF CACHE CONTROL REGISTER 
PARITY TRAPS SOMETIMES GO TO ADDRESS STORED HERE 
STACK SAVED HERE IF IN FIELD SERVICE MODE 
USED FOR RELOCATION TO A NEU BANK 

SOURCE OF DATA UORDS FOR CHECKBIT GENERATION SUBROUTINE I 
CHECKBITS TO BE LOADED INTO CSR ' 
CHECK BITS TO BE URITTEN i 
BIT MASK FOR CSR 
CSR ALL I'S PATTERN 

BIT POINTER ^ , 

VALUE TO BUMP THE PC BY TO RECOVER AFTER A PARITY TRAP | 



DIO 



CVMJAAO MSVll-w 
VARIABLES 

5061 002330 

5062 002332 

5063 002334 

5064 002336 

5065 002340 

5066 002342 

5067 002344 

5068 002346 

5069 002350 

5070 002352 

5071 002354 
5072 

5073 002356 

5074 002357 

5075 002360 
5076 

5077 002362 

5078 002364 

5079 002366 

5080 002370 

5081 002372 

5082 002374 
5063 002376 

5084 002400 

5085 002402 

5086 002404 

5087 002406 

5088 002410 

5089 002412 

5090 002416 

5091 002420 

5092 002422 

5093 002424 

5094 002426 

5095 002430 

5096 002432 

5097 002434 

5098 002436 

5099 002440 

5100 002442 

5101 002444 

5102 002446 

5103 002450 

5104 002452 

5105 002454 

5106 002456 

5107 002460 

5108 002462 
002470 
002476 

5109 002502 
002510 
002516 

5110 002522 

5111 002524 

5112 002526 

5113 002530 



MEMORY DIAG. MACRO V05.01b Fridsy 15-Feb 85 16:10 Psge 128-2 
INITIALIZED TO ZERO 



bEQ 0120 



000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 

000 
000 
000 

000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 



000000 



000000 000000 

000000 000000 
000000 

000000 000000 

000000 000000 
000000 



CSRINC: .UORD 
CSRLOOP: .UORD 
SUCCESS: .UORD 
ZEROS: .UORD 
TIME: .UORD 
SKIPMK: .UORD 
NULLFLAG: .UORD 
QVFLAG: 0 
ACTFLAGrO 
APTFLAGiO 
XXDPCHAIN 
iNOTE: 
$NULL : 
♦FILLS; 
$TPFLG; 



VALUE TO INCREMENT ADDRESS BY TO REMAIN IN THE SAME CSR 
LOOP CONTROL FOR CSR TESTING 
FLAG SET BY SUCCESSFULL TASK OR SUBROUTINE 
FOR AID IN "MOV" INSTRUCTIONS 
SECONDS THAT BATTERIES SHOULD LAST 
FLAG TO SKIP MKCONTROL SUBROUTINE 
SET UHEN RUNNING NULL PATTERNS 

FLAGS QUICK VERIFY PASS UNDER APT. ACT. OR XXDP CHAIN MODE 
FLAGS ACT AUTOMATIC MODE PROGRAMMING RULES 
FLAGS APT AUTOMATIC MODE PROGRAMMING RULES 
FLAGS XXDP CHAIN MODE PROGRAMMING RULES 
THESE TWO BYTES MUST STAY TOGETHER 

: CONTAINS NULL CHARACTER FOR FILLS 
5 CONTAINS # OF FILL CHARACTERS 
{'TERMINAL NOT AVAILABLE" FLAG 



♦ESCAPE 
EVEN: 



.BYTE 
.BYTE 
• BYTE 
.EVEN 

;0 
0 



0 
0 
0 
0 
0 
0 
0 



0 
0 
0 



STRIPES :0 



COUNT 
NOTAB 
BSIZE 
KSIZE 
LSIZE 
MSIZE 
PSIZE 



0 
0 
0 
0 
0 
0 
0 



T00MANY:0 
READONLY :0 
TESTADD:0.0 
UNITOP: 0 
STOPOK: 0 
APTPAR: .UORD 
APTECC: .UORD 
NOFSMODE:0 
N0ERR0R:0 
L0ADBANK:0 
TEMP: 0 
QUICK: 0 
N0SC0PE:O 
FSINFLAG:0 
APTSIZE:0 
FS7FLAG:0 
C0NFGERR0R:0 



0 
0 



N022BIT 
NOSUPER 
ERRADD 



0 

:0 
:0 



.UORD 



CSRINF0:O. 0.0. 0.0. 0.0.0 



0,0.0.0,0.0.0.0 



LINKl: 0 
LINK2: 0 
CSRH0LD:O 
KFLAG: 0 



: ESCAPE ON ERROR ADDRESS 

USED FOR ALTERNATE DATA PATTERNS 

COUNTS DIAGONAL STRIPES 

BACKED UP COPY OF STRIPES 

NO TABLE BEING PRINTED - NOW 



K WORDS*************** 
WORDS***************** 

K WORDS 



SIZE OF 11/45 MOS MEMORY IN 
SIZE OF MFllS-K MEMORY IN K 
SIZE OF MSVll-L/P MEMORY IN 
SIZE OF MSVll-J MEMORY IN K WORDS 
SIZE OF Q-BUS PARITY MEMORY IN K WORDS 
FLAGS UHEN TOO MANY ERRORS HAVE BEEN PRINTED FOR A BANK 
FLAG TO PATTERNS TO READ ONLY 
THE ADDRESS TO RUN CSR TESTS ON 
HIGHEST ACCESSABLE BANK OF MEMORY THRU Q-BUS MAP 
FLAG TO ALLOW STOPPING WITH SWITCH REGISTER 
AMOUNT OF PARITY MEMORY ACCORDING TO APT 
AMOUNT OF ECC MEMORY ACCORDING TO APT 
FLAG TO DISABLE FIELD SERVICE MODE 
"THIS IS NOT AN ERROR" FLAG 
BANK LOADERS ARE RELOCATED TO 
USED FOR JUNK 

QUICK STOP FLAG FOR APT POWER FAIL 

"NO SCOPE LOOP ALLOUED" FLAG 

"FIELD SERVICE - NO INTERNAL INTERLEAVE" FLAG 

APT SIZING INFO FLAG 

TRUE UHEN IN FIELD SERVICE COMMAND 7 

CONFIGURATION ERROR FLAG 

USED FOR GENERAL PURPOSE INDEXING 

NO 22-BIT MODE FLAG 

NO SUPERVISOR MODE FLAG 

HOLDS THE CSR'S ERROR ADDRESS 

USED TO STORE INFORMATION ABOUT THE 16 



{POSSIBLE CSR'S 



? 



USED TO HOLD LINKS TO PATTERNS WHICH 
CAN EXECUTE IN THE PAR/PUR'S OR NOT 
USED TO STORE CSR VALUES FOR CSR TESTS 
USED TO FLAG MFllS-K MEMORY TO TESTS*** 



CVMJAAO MSVll-J MEMORY DIAG. MACRO VOS.Olb Friday 15 Feb-85 16: 
VARIABLES INITIALIZED TO ZERO 



ElO 

Page 



10 



128 3 



SEQ 0121 



5114 002532 

5115 002536 

5116 002540 

5117 002542 

5118 002544 



000000 
000000 
000000 
000000 



000000 



PGMCSR. .UORO 0.0 

INHECC: .WORD 0 

INHBANK : . UQRD 0 

FULLREL: .WORD 0 

ICMTGE: i*END OF COMMON TAGS 



POINTS TO PROGRAM CSR 

FLAGS INHIBIT ECC TESTS ON RELOCATION 



FIO 
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VARIABLES 



5121 

5122 

5123 

5124 

5125 

5126 

5127 

5128 

5129 

5130 

5131 

5132 

5133 

5134 

5135 

5136 

5137 

S13S 

5139 

5140 

5141 

5142 

5143 

5144 

5145 

5146 

5147 

5148 

5149 

5150 

5151 

5152 

5153 

5154 

5155 

5156 

5157 

5158 

5159 

5160 

5161 

5162 
5163 
5164 
5165 



002544 
002550 
002552 
002554 
002556 
002560 
002562 
002564 
002566 
002570 
002572 
002574 
002576 
002600 
002602 
002604 
002606 
002610 
002612 
002614 
002616 
002620 
002622 
002624 
002626 
002630 



002632 
002634 



002636 
002640 
002642 
002644 
002646 
002650 
002652 
002653 
002656 
002657 
002660 
002661 



INITIALIZED TO NOl. ZERO 



000401 000000 

001014 

040000 

000012 

000177 

177000 

160000 

000000 

000000 

000000 

000031 

002000 

000001 

177777 

176543 

123456 

176543 

123456 

177777 

177777 

000003 

052525 

000000 

000000 

000000 

000000 



SEQ 0122 



.SBTTL VARIABLES 



000377 
177400 



177570 
177570 
177560 
177562 
177564 
177566 
012 

207 377 377 

000 

077 

015 

012 000 



INITIALIZED TO NON ZERO 
CACHE CONSTANT (MOVED TO C0N7RL TO TL«N ON CACHE) 
CACHE CONSTANT (MOVED TO CONTRL TO TURN OFF CACHE) 
USED TO SELECT THE PROPER TEST MODE FOR A PATTERN RUN 
MAX 9 OF ERRORS PER BANK WITH SUll 
HIGHEST BANK OF MEMORY 

HIGHEST BANK OF MEMORY ^l (IN PAR FORMAT) 
ENDING ADDRESS 
END FLAG 

USED TO BUMP STACK ON FIRST CALL TO GTSUR 
PASS COUNTER 
SOB CONSTANT 
STACK BEGINNING 
HOME BANK OF LOADERS 

SET IF TESTING BANKS IN WORST FIRST MODEdST PASS) 
WORKING SEED HI (USED FOR RANDOM NUMBER GENERATOR) 
WORKING SEED LO (USED FOR RANDOM NUMBER GENERATOR) 
MASTER SEED HI (USED FOR RANDOM NUMBER GENERATOR) 
MASTER SEED LO (USED FOR RANDOM NUMBER GENERATOR) 
USED TO PRINT HEADINGS ONLY ONCE 
FOR AID IN "MOV" INSTRUCTIONS 

COUNTER FOR FLIPING DATA ON WORST CASE NOISE TEST 
PATTERN FOR SOFT ERROR BACKGROUND TESTS 
: CONTAINS SCOPE LOOP ADDRESS 
; CONTAINS SCOPE RETURN FOR ERRORS 
RESTART (START ADD 202) FLAG 
: CONTAINS TOTAL ERRORS 

s*********************** NOTE THESE TWO LOCATIONS MUST STAY TOGETHER ************ 
BAKPAT: .WORD 377 ;BACKGROUND PATTERN * 

SWAPAT: .WORD 177400 ; SWAPPED BAKPAT * 

• ************************iii******************************** ******«*««««««««««*«<,*« 



CACHKN: 


401.0 




CACHKF : 


1014 




TESTMOOE: 40000 




ERRMAX : 


10. 




LASTBANK:177 




LASTBLOCK: 177000 


ENDADD: 


160000 




ENOFLG: 


0 




SURFLG: 


0 




PASCNT : 


0 




SOBK: 


25. 




KSTACK: 


STACK 




LOADHOMErl 




WORST : 


177777 




SEEDHI: 


176543 




SEEDLO: 


123456 




MSEEDH: 


176543 




MSEEDL : 


123456 




HEADER : 


177777 




ONES: 


177777 




FLIPLOC. 


3 




SOFTPAT: 


52525 




$LPADR: 


.WORD 


0 


$LPERR: 


.WORD 


0 


RESTART: 


0 




JERTTL: 


.WORD 


0 



SWR: 

DISPLAY; 
$TKSi 
*TKB: 
HPS: 
JTPB; 
JFlLLCi 
$BELL: 



.WORD 

.WORD 
177560 
177562 
177564 
177566 
.BYTE 
.ASCIZ 



DSWR 
DDISP 



12 

<207><377><377> 



JQUES: .ASCII /?/ 

JCRLF: .ASCII <15> 

JLF: .ASCIZ <12> 
.EVEN 



ADDRESS OF SWITCH REGISTER 
ADDRESS OF DISPLAY REGISTER 
TTY KBD STATUS 
TTY KBD BUFFER 

TTY PRINTER STATUS REG. ADDRESS 
TTY PRINTER BUFFER REG. ADDRESS 
INSERT FILL CHARS. AFTER A "LINE FEED" 
CODE FOR BELL 

QUESTION MARK 
CARRIAGE RETURN 
LINE FEED 



CVMJAAO MSVll-J ^€MO«Y OlAG. 
CONFIGURATION TABLE 

5168 

5169 

5170 

5171 

5172 

5173 

5174 

5175 

5176 

5177 

5178 

5179 

5180 

5181 

5182 

5183 

5184 

5185 

5186 

5187 

5188 

5189 

5190 002664 000201 
5193 003670 



GIO 
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.SBTTL CONFIGURATION TABLE 
CONFIG:FIRST 16K CONFIGURATION WORDS (2 EACH) 

2N0 16K CONFIGURATION WORDS (2 EACH) 



SEQ 0123 



200TH 16K CONFIGURATION WORDS (2 EACH) 



CONFIGURATION WORDS: 
LOU: 



HIGH: 



CONFIG: .REPT 
CONFIEND: 



201 



BIT 0 ERRORS PRESENT 

BIT 1 MEMORY SUCESSFULLY ACCESSED 

BIT 2-4 RESERVED 

BIT 5 SKIP ECC LOGIC TESTS FLAG (1«SKIP) 

BIT 6 PROTECTED REGION OF ECC MEMORY 

BIT 7 PROTECTED (PROGRAM SPACE) 

BIT 8-11 CSR CODE 

BIT 12-15 RESERVED 

BIT 0-7 NUMBER OF ERRORS 

BIT 8-10 MEMORY TYPE 

BIT 11 RESERVED 

BIT 12 RESERVED 

BIT 13 "BACKGROUND PATTERN VALID" FLAG 

BIT 14 BANK SELECTED FOR TEST BY FIELD SERVICE MODE 

BIT 15 LOADERS HOME BANK 



CVMJAAO MSVll-J MEMORY 0IA6. 
********************** MAIN 

5195 

5196 003670 



5197 

5190 003670 



HIO 
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5199 






5200 






5201 






5202 003670 


013737 


000030 


5203 003676 


013737 


000032 


5204 003704 


000402 




5205 003706 


000000 




5206 003710 


000000 




5207 003712 


105737 


056666 


5208 003716 


001001 




5209 003720 


000005 




5210 003722 






003722 


005037 


002276 


5211 003726 


010637 


002274 


5212 003732 


013706 


002574 


5213 003736 


012700 


002000 


5214 003742 


005020 




5215 003744 


022700 


002544 


5216 003750 


001374 




5217 003752 


012737 


000177 


5218 003760 







5219 
5220 
5221 

5222 003760 

5223 003766 

5224 003770 

5225 003772 

5226 003774 

5227 004000 
5220 004002 
5229 



MACRO VOS.Olb Friday 15-Feb 85 16:10 
************************** 

.SBTTL ********************** MAIN ************************** 

START: SUBTST <<INITIALIZE VARIABLES TO ZERO>> 

;******************************************************w************************ 

{♦SUBTEST INITIALIZE VARIABLES TO ZERO 

SUBTST <<SAVEMT>> 

******************************************************************************* 

*SUBTEST SAVEMT 

******************************************************************************* 

SAVEMT SAVES THE EMULATOR AND PRIORITY LOCATION 
UNDER THE NAMES OF SAV30 AND SAV32. 



SAV30: 
SAV32: 
VMKOR: 



SEQ 01<!4 



NORES: 



1*: 



MOV 


30.SAV30 


:iSAVE EMULATOR ADDRESS 


MOV 


32.SAV32 


;;SAVE EMULATOR PRIORITY LEVEL 


BR 


VMKOR 


::GET AROUND TAG AREA 


.UORD 


0 


s sPUT EMULATOR INFO HERE 


.WORD 


0 


;;PUT PRIORITY LOCATION HERE 


TSTB 


$ENV 




BNE 


NORES 




RESET 






Clear 


HONFLG 


CLEAR RETURN TO MONITOR FLAG 






CLR MONFLG 


MOV 


SP.SAVMON 


;;SAVE XXDP MONITOR RESTART ADDRESS 


MOV 


KSTACK.SP 


; ; SETUP THE STACK POINTER 


MOV 


0*CMTAG.RO 


s: FIRST LOCATION TO BE CLEARED 


CLR 


(RO)* 


s; CLEAR MEMORY LOCATION 


CMP 


0*CMTGE,RO 


;:DONE? 


BNE 


li 


:LOOP BACK IF NO 


MOV 


0177.LASTBANK 


s RESTORE LASTBANK (THIS MUST BE DONE PRIOR TO 



SUBTST <<CLEAR NON-PROGRAM SPACE>> 

;***************************************************************************^*^^ 

:*SUBTEST CLEAR NON-PROGRAM SPACE 

i************************************************************************t****** 



012737 
005000 
000241 
005520 
020027 
103773 
005037 



000001 002076 



160000 



2$: 



002076 



:THIS 


ATTEMPS TO GET 


2 EVERY 


LOCATION THAT 


.TO THE XXDP LOADERS 


MOV 


Ol.NOPAR 


CLR 


RO 


CLC 




ADC 


(RO)* 


CMP 


RO. #160000 


BLO 


2$ 


CLR 


NOPAR 



; PARITY ACTION = COUNT £ IGNORE 



; RESTORE DEFAULT PARITY ACTION 



CVMJAAO MSVU-J MEMORY DIAG. 
CLEAR NON- PROGRAM SPACE 

5231 004006 



110 
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SEQ 0125 



5232 004006 

5233 004010 

5234 004012 
004012 

5235 004020 

5236 004026 
5237 

5238 
5239 
5240 



000401 
000000 

012737 

012737 
000007 



004074 
004032 



000004 
000010 



SL8TST 
: ************* 

i*SUBTEST 

; ************* 

BR 

PROTYP: .WORD 
SYSSIZ: SET4 
MOV 
.DSABL 
MOV 
MFPT 



5241 004030 


000406 








BR 


2i 


5242 004032 


012737 


047122 


000034 


li: 


MOV 


0*TYPE,34 


5243 004040 










TYPE 


MSG130 


004040 


104401 


071474 






TYPEIT 
.DSABL 


,MSG130 
CRF 


5244 004044 


000000 








HALT 




5245 004046 


012737 


000012 


000010 


2*: 


MOV 


012.10 


5246 004054 


110037 


004010 






MOVB 


RO. PROTYP 


5247 004060 










SET4 


03$ 


004060 


012737 


004074 


000004 




MOV 

. DSABL- 


#3*. 4 
CRF 


5246 004066 


005737 


177746 






TST 


CONTRL 


5249 004072 


000447 








BR 


6i 


5250 004074 


005037 


002544 




3J : 


CLR 


CACHKN 


5251 004100 


012737 


002336 


060342 




MOV 


«ER0S.DT14 


5252 004106 


022737 


000005 


004010 




CMP 


05, PROTYP 


5253 004114 


001436 








BEQ 


6i 


5254 004116 










SET4 


#4$ 


004116 


012737 


004146 


000004 




MOV 
.DSABL 


*4J ,4 

CRF 


5255 004124 


005037 


172516 






CLR 


MMR3 


5256 004130 


052737 


000020 


172516 




BIS 


#BIT4.MMR3 


5257 004136 


032737 


000020 


172516 




BIT 


*BIT4,MMR3 


5258 004144 


001005 








BNE 


5i 


5259 004146 


005237 


002454 




4$: 


INC 


N022BIT 


5260 004152 


012737 


000007 


002556 




MOV 


#7.LASTBANK 


5261 004160 


012737 


140000 


002552 


5*: 


MOV 


#140000. TESTMODE 


5262 004166 


005237 


002456 






INC 


NOSUPER 


5263 004172 


005037 


060212 
06035? 






CLR 


DT5*10 


5264 004176 


005037 






CLR 


DT14*10 


5265 004202 


005037 


060214 






CLR 


DT5*12 


5266 004206 


005037 


060354 






CLR 


DT14*12 


5267 004212 


022737 


000005 


004010 


6i: 


CMP 


#5, PROTYP 


5268 004220 


001003 








BNE 


22$ 


5269 004222 


052737 


000020 


172516 




BIS 


#BIT4,MMR3 


5270 004230 








22i: 


SET4 




004230 


012737 


004254 


000004 




MOV 
.DSABL 


#7$. 4 
CRF 


5271 004236 


005037 


052314 






CLR 


CPERRF 


5272 004242 


005737 


177766 






TST 


3*177766 


5273 004246 


012737 


177777 


052314 




MOV 


#-1. CPERRF 


5274 004254 








7i: 


RES4 





<<TYPE OF SYSTEM SIZER>> 
********************************************************^t******** 

TYPE OF SYSTEM SIZER 
****************************************************************** 

SYSSIZ ;SKIP OVER VARIABLE LOCATION 

0 

«J 
#3*. 4 
CRF 

OIJ.IO ; TRAPS TO 10 = BAD PROCESSOR TYPE 

TYPE OF PROCESSOR TEST: THIS INSTRUCTION 
(AVAILABLE ON NEUER PROCESSORS ONLY) PLACES 
A CODE IN THE LOWER BYTE OF RO THAT 
INDICATES THE PROCESSOR TYPE. 1-11/44 
3«ll/23. 5=11/83/84 (Orion) 

;LOAD TRAP VECTOR 
;TELL THEM BAD PROCESSOR TYPE 



NO NEED TO GO ON 
RESTORE TRAPS TO 10 
MOV THE CODE TO PROTYP 



SEE IF CACHE REGISTER RESPONDS 

BRANCH IF CACHE AVAILABLE 

NO CACHE ON SYSTEM 

DO NOT PRINT CONTRL ERROR MESSAGES 

IS THIS A 11/83/84 

YES - BRANCH 



SEE IF THERE IS 22-BIT ADDRESSING 



BRANCH IF 22-BIT RELOCATION 
SET FOR NO 22 BIT ADDRESSING 
HIGHEST BANK OF MEMORY 
MAKE TESTMODE USER 

CLEAR SOME ERROR DATA TAGS 



CPU TYPE ' 11/83/84 
NO - BRANCH 
SET UP 22 BIT ADDRESSING 
TRAPS GO TO 4* 



CLEAR THE FLAG 

IS THERE A CPU ERROR REGISTER? 
YES- TRAPPED 
ENABLE TRAPS TO 4 



CVMJAAO MSVll-J MEMORY 01 AG. 
TYPE OF SYSTEM SIZER 



004254 
004262 
004270 
00427? 
004276 



5275 



012737 
022737 
001002 
005037 



034114 
000005 

177766 



JIO 
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000004 
004010 



101$: 



MOV 
CMP 
BNE 
CLR 



#TIME0UT,4 
*5,PR0TYP 
101$ 
CPUERR 



.DSABL CRF 



SEQ 0126 



IS THIS AN 11/83/84 ? 
BRANCH IF NOT 

CLEAR OUT THE CPU ERROR REGISTER BITS 
:THAT A EXPECTED TRAP COULD HAVE SET 



CVMJAAO MSVll-J MEMORY DIAG. 
TYPE OF SYSTEM SIZEfl 

5278 004276 



KIO 
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SEQ 0127 



5289 
5290 
5291 
5292 
5293 
5294 
5295 
5296 
5297 

5298 
5299 
5300 
5301 
5302 
5303 
5304 
5305 



004364 
004372 
004400 
004406 
004414 
004422 
004430 
004436 
004444 
004452 
004460 
004466 
004474 
004502 
004510 
004516 
004524 



012737 
012737 
012737 
012737 
012737 
012737 
012737 
012737 
012737 
012737 
012737 
012737 
012737 
012737 
012737 
012737 
104423 



051146 
000340 
051502 
000340 
056764 
000340 
045352 
000340 
033744 
000340 
034140 
000340 
034114 
000340 
034126 
000340 



000020 
000022 
000030 
000032 
000034 
000036 
000024 
000026 
000114 
000116 
000010 
000012 
000004 
000006 
000250 
000252 



SUBTST <<INITIALIZE VARIABLES TO NGN ZERO>> 
;*SUBTEST INITIALIZE VARIABLES TO NON ZERO 

; *********************************************************************** 

MOV 0-1. WORST 
MOV 0-1. HEADER 

; PRIME THE RANDOM NUMBER GENERATOR 
:B0TH HIGH AND LOU WORDS 



■** , ******************************************************************i,*t****** 

{♦StuTEST INITIALIZE VECTORS 

; ******************************************************************************* 



5279 


004276 








9C 1 






004276 


012737 


177777 


002600 






5280 004304 


012737 


000003 


002616 


MOV 


03.FLIPL0C 


5281 


004312 








SET 


HEADER 




004312 


012737 


177777 


002612 






5282 


004320 


012737 


176543 


002606 


MOV 


01 76543. MSEEDH 


5283 


004326 


012737 


123456 


002610 


MOV 


0123456. MSEEDL 


5284 


004334 


013737 


002606 


002602 


MOV 


MSEEDH.SEEDHI 


5285 


004342 


013737 


002610 


002604 


MOV 


MSEEDL.SEEDLO 


5286 


004350 


012737 


000377 


002632 


MOV 


«77,BAKPAT 


5287 


004356 


012737 


177400 


002634 


MOV 


0177400. SWAPAT 


5288 


004364 








SUBTST 


<<INITIALIZE VECTORS) > 



MOV OlSCOPE.IOTVEC 

MOV #340.I0TVEC»2 

MOV 0*ERR0R.EMTVEC 

MOV 0340.EMTVEC*2 

MOV OITRAP.TRAPVEC 

MOV 0340.TRAPVEC«2 

MOV OIPWRDN.PURVEC 

MOV 0340.PURVEC*2 

MOV OPARITY.PARVEC 

MOV 0340.PARVEC*2 

MOV 0PDP1105.RESVEC 

MOV 0340.RESVEC*2 

MOV OTIMEOUT.ERRVEC 

MOV »340,ERRVEC«2 

MOV OMMTRAP.MMVEC 

MOV «40.MMVEC*2 
CACHON 



lOT VECTOR FOR SCOPE ROUTINE 
LEVEL 7 

EMT VECTOR FOR ERROR ROUTINE 
LEVEL 7 

TRAP VECTOR FOR TRAP CALLS 
LEVEL 7 

! POWER FAILURE VECTOR 
{LEVEL 7 

GET READY FOR PARITY ERRORS 



; RESERVED INSTRUCTION TRAP 

SETUP TIMEOUT ERRORS 

SET PRIORITY OF ERROR TRAPS 

VECTOR FOR MEMORY MANAGEMENT 



.-TURN CACHE ON 



CVMJAAO MSVll-J MEMORY DIAG. 
INITIALIZE VECTORS 

5308 004526 



5309 
5310 
5311 
5312 

5313 004526 012700 056734 

5314 004532 012001 

5315 004534 012703 017014 

5316 004540 012702 000020 

5317 004544 004737 004644 

5318 004550 012001 

5319 004552 012702 000010 

5320 004556 004737 004644 

5321 004562 012001 

5322 004564 012703 017244 

5323 004570 012702 000020 

5324 004574 004737 004644 

5325 004600 012001 

5326 004602 012702 000010 

5327 004606 004737 004644 

5328 004612 012001 

5329 004614 012703 017430 

5330 004620 012702 000020 

5331 004624 004737 004644 

5332 004630 012001 

5333 004632 012702 000010 

5334 004636 004737 004644 

5335 004642 000417 
5336 

5337 004644 



LIO 
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SEQ 0128 



SUBTST <<INITIALIZE PATTERNS>> 

{♦SUBTEST INITIALIZE PATTERNS 

sTHE APT E TABLE DETERMINES WHICH PATTERNS ARE GOING TO BE RUN. 

sEACH BIT SET REPRESENTS A PATTERN TABLE ENTRY THAT IS TO BE LEFT 

i ALONE (TO BE RUN). EACH BIT CLEARED REPRESENTS A PATTERN TABLE ENTRY 

:THAT IS TO BE OVERLAYED WITH THE ADDRESS OF A NULL PATTERN. 

MOV «I00U0,R0 

MOV (R0)»,R1 

MOV »MKCSRT,R3 

MOV «16.,R2 

CALL PATPLUG 

MOV CR0)*.R1 

MOV «8..R2 

CALL PATPLUG 

MOV (R0)*.R1 

MOV tfMKPAT,R3 

MOV 016.. R2 

CALL PATPLUG 

MOV (R0)».R1 

MOV M..R2 

CALL PATPLUG 

MOV (R0)».R1 

MOV tfMJPAT,R3 

MOV 016.. R2 

CALL PATPLUG 

MOV (R0)».R1 

MOV «8.,R2 

CALL PATPLUG 

BR SU6AAA 

PATPLUG: SUBTST <<SUBR PLUG IN NULL PATTERNS>> 

:*SUBTEST SU6R PLUG IN NULL PATTERNS 

■ ******************************************************************************* 



5338 


004644 






FOR I 01 TO R2 










004644 


012737 


000001 002452 






MOV 


#1.1 




004652 








BO::i 




5339 


004652 


006001 




ROR Rl 








5340 


004654 
004654 


103402 




ON.NOERROR 


;IF CARRY CLEAR 


BCS 


LO 


5341 


004656 


012713 


024220 


MOV #MT0999.(R3) 








5342 


004662 
004662 






END iOF ON. ERROR 


LO::: 






5343 


004662 


062703 


000002 


ADD «2.R3 








5344 


004666 






END sOF FOR 










004666 


005237 


002452 






INC 


I 




004672 


023702 


002452 






CMP 


I.R2 




004676 


003765 








BLE 


BO 




004700 








EO: ; : 






5345 


004700 


000207 




RETURN 









CVMJAAO MSVll-J MEMORY DIAG. 
SUBR PLUG IN NULL PATTERNS 

5348 004702 



5349 
5350 
5351 

5352 004702 
004702 
004706 

5353 004710 

5354 004714 

5355 004716 

5356 004722 

5357 004724 
004724 

5358 

5359 004724 

5360 004732 



MIO 

MACRC VOS.Olb Friday 15 Feb-85 16:10 Page 140 



SEQ 0129 



SUBAAA: SUBTST << CLEAR THE CONFIGWATION TABLE >> 
********************************************** 

♦SUBTEST CLEAR Tf E CONFIGURATION TABLE 

******************************************************************* t*********t* 

iTHIS ZEROS (UNLESS WE STARTED AT ADDRESS 202) THE CONFIG TABLE 
5UHICH IS FULLY DISCRIBED AT LOCATION "CONFIG". 
ENABLE LSB 



005737 
001006 
012700 
005020 
022700 
001374 



002626 
002664 
003670 



IF RESTART IS FALSE 



1*1 



MOV 
CLR 
CMP 
BNE 
END :0F 



oconfig.ro 

(RO)* 

oconfiend.ro 

1» 

IF RESTART 



TST RESTART 
BNE LI 



012737 000002 002106 



.DSABL 
MOV 

SUBTST 



LSB 

OBITl.CPUBIT 
<<SIZE FOR A 



LI: 



5361 
5362 
5363 

5364 004732 
004732 

5365 004740 

5366 004746 

5367 004754 
004754 
004762 

5368 004764 

5369 004766 

5370 004772 

5371 004774 
004774 
005002 
005010 
005012 
005016 



5372 005016 

5373 005024 

5374 005032 
005032 

5375 



012737 004766 000004 



sSET ID BIT 
HARDWARE SWITCH REGISTER>> 
i ******************************************************************************* 

;*SUBTEST SIZE FOR A HARDWARE SWITCH REGISTER 

******************************************************************************** 

;ilF NOT FOUND OR IT IS 

;! EQUAL TO A "-1". SETUP FOR A SOFTWARE SWITCH REGISTER. 
LSB 

; TRAPS TO 4 GOTO 31 



012737 
012737 

022777 
001023 
000403 
012716 
000002 

012737 
022737 
001002 
005037 



012737 
012737 



177570 002636 
177570 002640 

177777 175654 



004774 



034114 000004 
000005 004010 



177766 



000176 002636 
000174 002640 



3$: 
2$: 

101 ^ 



.ENABL 
SET4 
MOV 
.DSABL 
MOV 
MOV 
IF 0-1 



BR 
MOV 
RTI 
RES4 

MOV 

CMP 

BNE 

CLR 



.DSABL 

MOV 

MOV 
END sOF 



03* 
#3*.4 

CRF 

ODSWR.SWR 
ODDISP. DISPLAY 
EQ 9SWR 



21 

#2$.(SP) 



0TIME0UT.4 
#5.PR0TYP 
1011 
CPUERR 



CRF 

»SWRE6.SWR 
ODISPREG. DISPLAY 
IF 0-1 



; SETUP FOR A HARDWARE SWITCH REGISTER 

;AND A HARDWARE DISPLAY REGISTER 

IF NO TRAP FROM REFERENCE TO aSWR AND aSWR • 

CMP *-l,aSWR 
BNE L2 

BRANCH IF NO TIMEOUT 
;sSET UP FOR TRAP RETURN 

J RESET TRAPS TO 4 TO DEFAULT 

sis THIS AN 11/83/84 ? 
{BRANCH IF NOT 

; CLEAR OUT THE CPU ERROR REGISTER BITS 
;THAT A EXPECTED TRAP COULD HAVE SET 
POINT TO SOFTWARE SWR 



0-1 



.DSABL LSB 



L2: 



NIO 
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SIZE FOR A HARDWARE SWITCH REGISTER 



5378 


005032 








5379 










5380 










5381 


005032 


005037 


056654 




5382 


005036 










005036 


132737 


000040 


056667 




005044 


001403 






5383 


005046 










005046 


012737 


177777 


002360 


5384 


005054 










005054 








5385 


005054 










005054 


132737 


000200 


056667 




005062 


001403 






5386 


005064 










005064 


012737 


177777 


002444 


5387 


005072 










005072 








5388 005072 










005072 


123727 


056666 


000001 




005100 


001023 






5389 


005102 










005102 


012737 


177777 


002352 




005110 


012737 


177777 


002346 




005116 


012737 


177777 


002062 




005124 


012737 


177777 


002436 


5390 


005132 


012737 


040720 


000024 


5391 


005140 


012737 


056670 


002636 



SUBAAB: SUBTST <<SETUP ACT. APT. £ XXDP>> 

; •SUBTEST SETl^ ACT. APT. t XXDP 

sTHIS SETS UP A BUNCH OF FLAGS TO TELL THE PROGRAM EVERYTHING 
;IT CARES TO KNOW ABOUT APT. ACT. £ XXDP. 
CLR IPASS J CLEAR PASS COUNT 

IFB #BIT5 SET. IN JENVM 



; INDICATE NO TERMINAL 



SET ITPFLG 
END sOF IFB #BIT5 
IFB #BIT7 SET, IN lENVM 

SET APTSIZE 
END {OF IFB #BIT7 
IFB lENV EQ «1 

SET APTFLAG.QVFLAG.I AUTO. QUICK 



MOV «APTDOWN,PWRVEC 

MOV «ISWREG.SUR :USE APT SUR 



L3: 



BITB MIT5.IENVM 
BEQ L3 

MOV #-l.$TPFLG 



BITB #6IT7,$ENVM 
BEQ L4 

MOV #-1. APTSIZE 



L4: 



CMPB »ENV.#l 
BNE L5 



MOV 
MOV 
MOV 
MOV 



#-l.APTFLAG 
#-l,QVFLAG 
#-l.»AUTO 
«-l, QUICK 



SCO 0130 



CVHJAAO HSVU-J rCHORY DIAG. 
SETUP ACT. APT, t XXOP 
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5392 005146 








ELSE 


005146 


000430 








OOSItO 










5393 005150 








IF 42 Nc •STACK AND 42 Nt 


AAV • ■ A 

005150 


023727 


000042 


002000 




005156 


001424 








005160 




000042 






oosloa 


















3C 1 HVr L Mb ■ * nU 1 U 


0v516e 


Ols ' 3 ' 


1 77777 

X 1 1 1 1 1 


OOed^e 




rtl 3717 


1 77777 

i 1 1 1 1 1 






woe AAOAS 








Tc AO AtcunAn 
Ir 4e cU vfcNUHU 






/W>AA3 


01404e 






AAI AAA 


















UvSclC 


rtl 37X7 


1 mil 

X f f f f 1 


AA3T^ 












CI CC 






















5398 005222 








SE' XXDPCHAIN 


005222 


012737 




002354 




5399 005230 








END sOF IF 42 


005230 










5400 005230 








END jOF IF 42 


005230 










5401 005230 








END :0F IFB $ENV 


005230 











SEO 0131 



BR L6 

L5::::::i 

CnP 42.0STACK 
BEQ L7 
TST 42 
BEQ L7 

MOV »-l.QVFLAG 
MOV •-l.JAUTQ 

CMP 42. «) END AO 

BNE LIO 

MOV 0-l.ACTFLAG 

BR Lll 

LIO::::::; 

MOV 0-1, XXDPCHAIN 
Lll:;::::: 
L7:::;::: 
L6:::;;;: 



CVMJAAO MSVll-J 
SETUP ACT, APT. 

5403 005230 



ME WRY DIAG. 
L XXOP 



Cll 

MACRO V05.01b Friday 15-Feb 85 16:10 Page 



143 



SEQ 0132 



5404 
5405 
5406 



5407 



5408 

5409 
5410 



5411 



005230 
005236 
005244 
005244 
005252 
005254 
005254 
005260 
005262 
005262 
005270 
005272 
005272 
005274 
005274 
005274 



052737 000200 002664 

052737 000200 002670 

022737 014042 000042 
001412 

005737 002454 
001405 



SUBTST <<PROTECT PROGRAM t LOADERS >; 
{♦SUBTEST PROTECT PROGRAM t LOADERS 



BIS #BIT7. CONFIG 
BIS *BIT7.C0NFIG»4 
IF «$ENDA0 NE 42 



IF N022BIT NE #0 



PROTECT PROGRAM SPACE (BANK 01 
PROTECT LOADER SPACE (BANK 1) 
NOT ACT-11? 



012737 
104064 

000402 



.77777 002276 



SET 

ERROR 
ELSE 



MONFLG 
^64 



} RETURN TO XXDP MONITOR 
; ILLEGAL PROCESSOR 



104401 071422 



TYPE MSGOOO 
TYPEIT .MSGOOO 
.DSABL CRF 



L13: 

sTYPE PROGRAM TITLE 



CMP »$EN0AD.42 
BEQ L12 

TST N022BIT 
BEQ L13 

MOV #-1. MONFLG 
BR L14 



5412 


005300 
005300 










END 






5413 


005300 
005300 










END sOF 


IF #$ENDAD 




5414 


















5415 


005300 










SUBTST 


<<CHECK FOR CACHE AND MEMORY MANAGEMENT >> 
























; ♦SUBTEST 


CHECK FOR CACHE AND MEMORY MANAGEMENT 












: ******************************************************************************* 


5416 












:♦ THIS 


FIGURES OUT IF THERE IS A CACHE AND MEMORY MANAGEMENT 


5417 












:♦ ON THE SYSTEM. AND WHETHER IT 


IS ENABLED OR DISABLED. 


5418 


005300 










SET4 


«3$ 






005300 


012737 


005500 


000004 




MOV 
.DSABL 


«$.4 

CRF 




5419 


005306 


005737 


177746 






TST 


CONTRL 


;IS THERE A CONTROL REGISTER? 


5420 


005312 










SET4 


#1$ 






005312 


012737 


005412 


000004 




MOV 
.DSABL 


#1$,4 

CRF 




5421 


005320 


005737 


172516 






TST 


MMR3 


J IS THERE A MMR3 REGISTER? 


5422 


005324 


013746 


000004 






MOV 


4,-(SP) 


i.-V SAVE OLD TIME OUT 


5423 


005330 


012737 


005400 


000004 




MOV 


014$. 4 


!jV PASS ON KTJll 


5424 


005336 


032737 


001000 


177750 




BIT 


0BIT9. 80177750 


sV TEST FOR 1184 


5425 


005344 


001415 








BEQ 


14$ 


isV ELSE REPORT 1183 


5426 


005346 










TYPE 


M1184 


isV REPORT 1184 




005346 


104401 


071100 






TYPEIT 
.DSABL 


.M1184 

CRF 




5427 


005352 


052737 


000400 


177730 


12$: 


BIS 


#BIT8.a«177730 


:V SET ABILITY TO CLEAR 


5428 


005360 


042737 


000077 


177734 




BIC 


«77.a«177734 


;V UNIBUS MEMORY ACCESS 


5429 


005366 










TYPE 


NOUBMT 


:V TO UNIBUS 




005366 


104401 


071547 






TYPEIT 
.OSABL 


.NOUBMT 
CRF 




5430 


005372 


012637 


000004 






MOV 


(SP)».4 


:V AND REPORT NO UNIBUS 


5431 


005376 


000411 








BR 


4$ 


sV MEMORY ACCESS AND CONTINUE 


5432 


00540' 


012637 


000004 




14$: 


MOV 


(SP)».4 


;V ALSO RESTORE OLD TIME OUT 


5433 


005404 










TYPE 


MSG117 


11/83 




005404 


104401 


071112 






TYPEIT 


.MSG117 
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5434 


005410 


000404 






5435 


005412 










005412 


012737 


177777 


002276 


5436 


005420 


104064 












0000 1 A 


±111 HO 


5438 


005430 


042737 


000014 


177746 


5439 


005436 


032737 


000004 


177746 


5440 


005444 


001004 






5441 


005446 


032737 


000010 


177746 


5442 


005454 


001413 






5443 


005456 










005456 


104401 


071154 




5444 


005462 


104424 






5445 


005464 


013737 


002544 


002546 


5446 


005472 


005037 


002544 




5447 


005476 


000404 






5448 


005500 










005500 


104401 


071124 




5449 


005504 










005504 


104401 


071133 







.DSABL 


CRF 




BR 


4$ 


1*: 


SET 


MQNFLG 




ERROR 


♦ 64 


4$: 


BIS 


#BIT2!BIT3.C0NTRL 




BIC 


#BIT2!BIT3.C0NTRL 




BIT 


0BIT2,C0NTRL 




BNE 


7$ 




BIT 


#BIT3,C0NTRL 




BEQ 


6$ 


7$: 


TYPE 


MSG121 




TYPEIT 


.MSG121 




.DSABL 


CRF 




CACHOFF 






MOV 


CACHKN,CACHKN»2 




CLR 


CACHKN 




BR 


8$ 


3$: 


TYPE 


MSG119 




TYPEIT 


.MSG119 




.DSABL 


CRF 


6$: 


TYPE 


MSG120 




TYPEIT 


.MSG120 




.DSABL 


CRF 



1 



SEQ 0133 



: PROCESSOR NOT SUPPORTED BY THIS DIAGNOSTIC 

MOV #-l.MONFLG 

;N0 MEMORY MANAGEMENT 
:SET CACHE DISABLE BITS 
; CLEAR CACHE DISABLE BITS 
jIS THE BIT SET? 
jBRANCH IF THE BIT IS SEi 
jIS THE BIT SET? 
J BRANCH IF THE BIT IS SET 
; CACHE BYPASSED 



SAVE INFO ABOUT CACHE 

CACHE CANNOT BE USED - IT'S BYPASSED 

NO 

{CACHE AVAILABLE 



Ell 

CVMJAAO MSVU-J MEMORY OIAG. MACRO VOS.Olb Friday 15 Feb-85 16:10 Page 144 
CHECK FOR CACHE AND MEMORY MANAGEMENT 

5451 005510 SUBTST <<SETUP USER 6 SUPERVISOR STACK >> 

;*SUBTEST SETUP USER £ SUPERVISOR STACK 

ftttttt******************** ****************************************** f ******** 
5*52 005510 104421 8$: DEENERSIZE sTURN OFF MEMORY MANAGEMENT 

5453 005512 005737 002456 TST NOSUPER sIS THERE A SUPERVISOR MODE? 

5454 005516 001011 BNE 5* ; NO-SKIP SUPERVISOR SETUP. 
5455 

5456 sSET PREVIOUS MODE TO SUPERVISOR 

5457 005520 042737 030000 177776 BIC #BIT13!BIT12,PSU 

5458 005526 052737 010000 177776 BIS #BIT12.PSU 
5459 

5460 005534 PUSH #SUPSTK 

005534 012746 000740 MOV #SUPSTK. -(SP) 

5461 005540 006606 MTPI SSP 
5462 

5463 sSET PREVIOUS MODE TO USER 

5464 005542 052737 030000 177776 54: BIS #BIT13!BIT12.PSU 
5465 

5466 005550 PUSH tfUSESTK 

005550 012746 000700 MOV #USESTK.-(SP) 

5467 005554 006606 MTPI USP 
5468 

5469 005556 SUBTST <<GET SOFTWARE SWITCH REGISTER IF NECESSARY) > 

; ******************************************************************************* 

s •SUBTEST GET SOFTWARE SWITCH REGISTER IF NECESSARY 

;******************************************************************t************ 

5470 005556 IF *AUTO IS FALSE :IF NOTCAPT OR ACT) 
005556 005737 002062 TST $AUTO 
005562 001012 BNE L15 

5471 005564 IF SUR EQ OSWREG :IF SOFTWARE SWITCH REG SELECTED 
005564 023727 002636 000176 CMP SUR.ffSUREG 
005572 001006 BNE L16 

5472 005574 SET SURFLG ; s SET FLG TO BUMP STACK 
005574 012737 177777 002566 MOV #-1. SURFLG 

5473 005602 104407 GTSUR ; ;GET SOFT-SUR SETTINGS 

5474 005604 005037 002566 CLR SWRFLG CLEAR IT FOR REST OF PROGRAM 

5475 005610 END iOF IF SUR 

005610 L16: 

5476 005610 END ;0F IF $AUT0 

005610 L15:;:;::: 

5477 

5478 005610 SUBTST <<GET MEMORY MANAGEMENT READY>> 

•********************************************************************t********** 

!*SUBTEST GET MEMORY MANAGEMENT READY 

;************************************************************************tt***** 

5479 005610 104422 KMAP ;MAP KERNEL SPACE 1 TO 1 

5480 005612 MAP ;MAP SUPERVISOR SPACE (TEST AREA) 1 TO 1 
005612 010346 MOV R3.-(SP) 
005614 012703 000200 MOV #200. R3 

005620 004737 035716 CALL MAPPER 

.DSABL CRF 

005624 012603 MOV (SP)*.R3 

':481 005626 104420 ENERGIZE :TURN ON MEMORY MANAGEMENT 



SEQ 0134 



CVMJAAO MSVU-J MEMORY DIAG. 
GET MEMORY MANAGEMENT READY 

54S4 005630 



5485 
5406 
5487 
5488 
5489 
5490 
5491 
5492 
5493 
5494 
5495 
5496 
5497 
5498 
5499 
5500 
5501 
5502 
5503 
5504 
5505 
5506 
5507 



005630 000004 



Fll 
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NEUTST <<BIT TEST OF ALL CSR'S>> 

;***********************************************••********•*•**••*************•* 

;*TEST 1 BIT TEST OF ALL CSR'S 

; ******************************************************************************* 



SEQ 0135 



TSTl: 



SCOPE 



005632 005005 

005634 005000 

005636 012703 172100 

005642 012737 000001 002076 

005650 

005650 012737 006024 000004 



• THE FIRST PART OF THE CONFIGURATION ANALYSIS DOES THE FOLLOWING: 

• 1) FINOS WHICH CSR'S RESPOND. AND PUTS THEM INTO THE CSR INFORMATION 

* TABLE. AND STORES ANOTHER BIT FOR "TOTCSRS". 

♦ 2) TESTS THE CSR BITS COMMON TO ALL CSR'S. 

♦ 3) FIGURES OUT IF THE MODULE IS A ECC. OR PARITY MEMORY 

* 4) TESTS THE BITS PARTICULAR TO THAT TYPE OF CSR. 

♦ 5) IF ANY BITS TEST BAD IN THE CSR UNDER TEST, THE CSR OK BIT IN THE 

♦ CSR INFORMATION TABLE IS CLEARED. 

* THE INFORMATION BITS ONE THROUGH THREE FORM A CODE WHICH GIVES THE TYPE 

♦ OF CSR: 



TYPE 

MSVll-L/P 
MSVll-J 



ECC 
BITO 

0 
1 



PARITY 
ECC 



THIS MEMORY CODE WILL BE USED IN THE SECOND PART OF THIS ANALYSIS 



5508 

5509 
5510 
5511 
5512 
5513 
5514 
5515 

5516 



5517 
5518 

5519 
5520 
5521 



5522 
5523 
5524 

5525 
5526 



005656 
005656 
005656 
005660 
005664 
005666 
005674 
005702 
005704 
005704 
005710 
005710 
005714 
005716 
005724 
005724 
005724 
005726 
005732 
005732 
005740 
005742 
005750 
005752 
005752 
005752 
005756 



CLR 

CLR 

MOV 

MOV 

SET4 

MOV 

.DSABL 

REPEAT 



R5 
RO 

#CSRADD,R3 

Ol.NOPAR 

OCSRBMP 

«CSRBMP,4 

CRF 



R5 IS THE TOTAL CSR NUMBER 
RO IS A TABLE INDEX 
R3 HAS THE CSR ADDRESS 
IGNORE PARITY ERRORS 



005713 

052705 000001 
005004 

042760 000006 002462 
052760 000030 002462 
005013 

012713 020000 

032713 020000 
001403 

052760 000001 002462 



005013 

004737 006220 

026027 002462 000030 
100004 

016037 002462 002052 
104021 



062700 000002 
062703 000002 



81: 



TST (R3} :D0ES THIS CSR RESPOND??? 

BIS #1.R5 ;MARK IT IN CSR MAP 

CLR R4 : CLEAR THE LAST CSR INDICATOR 

BIC 06.CSRINF0(R0) ; CLEAR UNUSED BITS 

BIS #BIT4!BIT3.CSRINF0(R0) jYES-MARK IT IN CSR INFORMATION TABLE 
CLR {R3) : CLEAR THE CSR UNDER TEST 

LET (R3) :« #BIT13 sIS THIS AN ECC MEMORY??? 

MOV #BIT13,(R3) 

IF *BIT13 SET. IN (R3):IS BIT 13 SET 

BIT *BIT13,(R3) 
BEQ L17 

BIS #BITO.CSRINFO(RO)!MARI< IT IN THE TABLE AS BEING A ECC MEMORY 
END : 



CLR (R3) 
CALL RWCSR 
IF CSRINFO(RO) MI 



L17: 



s CLEAR CSR UNDER TEST 
;BIT TEST OF ALL BITS IN CSR'S 
30 iDO WE HAVE A LEGAL CONFIGURATION? 

CMP CSRINF0(R0).#30 
BPL L20 

MOV CSRINFO(RO).BAD ;M0VE IN BAD DATA 
ERROR ^21 ; 



NXTCSR: 



END 

ADD #2.R0 
ADD S2.R3 



;G0 TO NEXT CSR 
:G0 TO NEXT CSR 



L20: 



Gil 
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Tl BIT TEST OF ALL CSR'S SEQ 0136 



5SP7 


005 7 fe^' 


006305 






ASL R5 


• SHIFT CSR MAP 








005764 

\J\J J 1 \J~ 








ON FRROR 


•T<» THFRF A C<>R 0 








005764 


103001 








BCC 


L21 




005766 


005204 






INC R4 


•YES SET CSR PRESENT FLAG 






5530 


005770 
005770 








END 


L21 






5531 


005770 








UNTIL RO EQ #40 


•UNTIL ALL CSR'S ARE DONE 








005770 


020027 


000040 






CMP R0.040 




005774 


001330 










BNE 


Bl 




005776 










El- 






5532 


005776 


006005 






RQR R5 


iRESYNC R5 






5533 


006000 


005704 






TST R4 


:UAS THERE A CSR 0? 






5534 


006002 
006002 


001402 






RNE 22$ 


; BRANCH IF NOT EQUAL 


BEQ 


22 i 


5535 


006004 


052705 


100000 




BIS *BIT15,R5 


sYES SET IT IN CSR TABLE 






5536 


006010 






22$: 


LET TOTCSRS := R5 


! STORE CSR MAP IN TOTCSRS 








006010 


010537 


002224 








MOV 


R5. TOTCSRS 


5537 


006014 


004737 


006034 




CALL CSRMAP 


; PRINT CSR MAP 




5538 


006020 








JUMPTO CTEST 


i 








006020 


000137 


006714 








JMP 


CTEST 


5539 


















5540 


006024 


062706 


000004 


CSRBMP: 


ADD #4.SP 


;FIX STACK POINTER FOR NON- 


EXISTANT 


CSR TRAP 


5541 


006030 


000137 


005752 




JMP NXTCSR- 


:G0 ON TO NEXT CSR 






5542 



















CVMJAAO nSVll-J rCNORY 01 AG. 
Tl BIT TEST OF ALL CSR'S 

5544 006034 



5545 006034 


005000 




5546 006036 






006036 


104401 


071370 


5547 006042 






006042 


104401 


A£ f Af A 

066064 


5545 006046 


005001 




5549 006050 






006050 






5550 006050 


010102 




5551 006052 


022702 


000011 


5552 006056 


• AAA 

100002 




5553 006060 


A^ ^^A^ 

062702 


AAAA A^ 

000007 


CCCil AA£.A£.A 

5554 006064 


062702 


AAAA£.A 
000060 


CCKC AA£.A^A 

5555 006070 


110237 


066062 


CCC£. AA^A^il 

5556 0060 /'* 






AA£.A^il 

0060 '4 


1 Ailil A1 

104401 


A£.£.A£ ^ 

066062 


5557 006100 






AAt 1 AA 
0U6100 


104401 


A^^A&A 

066060 


CCCA AA£. 1 Ail 

5550 006104 


AAC OA 1 

005201 




CCCO AA£. 1 f\C 

5557 006106 






AA^ 1 A£. 

006106 


AOA1 07 

02012 r 


AAAAOA 

000020 


OOollc 


AA1 

001^56 




AAC \ \ A 

006114 






5560 006114 






000114 


1U44U1 


065544 


CC^I AA&19A 

5561 006120 






AA£ 1 ^A 

006120 






CC^*) AA£ 1 ^A 

5562 006120 






AA£ 1 9A 

006120 


AAC?£.A 

005760 


AA^il£.0 

002462 


AA£ 4 "^A 

006124 


001414 




5563 006120 






006126 


A^ '^T^.A 

032760 


AAAAA 1 

000001 


006134 


A A 4 Jl AJI 

001404 




5564 006136 


112737 


AAA 1 AC 
000105 


5565 006144 






AA£ AAA 

006144 


AA Ail A V 

000403 




AA£ AAA. 

00el4e 








1 1P757 


AAA1 OA 


5567 006154 






006154 






5566 006154 






006154 


000403 




006156 






5569 006156 


112737 


000040 


5570 006164 






006164 






5571 006164 






006164 


104401 


066062 



Hll 
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CSRMAP: SUBTST <<PRINT CSR REGISTER MAP>> 
{♦SUBTEST PRINT CSR REGISTER MAP 



SEQ 0137 



1$; 



002462 
066062 

066062 
066062 



CLR 
TYPE 
TYPEIT 
.DSABL 
TYPE 
TYPEIT 
.DSABL 
CLR 
REPEAT 



RO 
MS&008 
,MSG008 
CRF 

MSG016 
.MSG016 
CRF 
Rl 



J CLEAR CSR INFO POINTER 
; PRINT TITLE 



; PRINT CSR NUMBERS 



82: 



JUMP AROUND NEXi INSTRUCTION 
MAKE IT ASCII 

jTYPE SINGLE SPACE 



MOV R1.R2 

CMP #9..R2 

BPL 1* 

ADD #7.R2 

ADD *60.R2 

MOVB R2.MSG015 

TYPE MSG015 
TYPEIT .MSG015 
.DSABL CRF 

TYPE MSG014 
TYPEIT .MSG014 
.DSABL CRF 

INC Rl : 
UNTIL Rl EQ #16. ; 

CMP R1.S16. 
BNE B2 
E2::::::: 

TYPE MSG009 ;TYPE MEMTYPE 

TYPEIT .MSG009 
.DSABL CRF 

REPEAT ; 

B3: 

IF CSRINFO(RO) NE #0 sIS CSR NONEXSISTANT???? 

TST CSRINFO(RO) 
BEQ L24 

IF OBITO SET. IN CSRINFO(RO) 

BIT *BITO.CSRINFO(RO) 
BEQ L25 

MOVB O'E.MSGOIS sIT IS A MSVll-J 
ELSE 

BR L26 
L25:ii:::; 

MOVB #'P,MSG015 :IT IS A MSVll-L/P 

L26: :::::: 

BR L27 

L24: 

L27::;;;;: 
sTYPE MEMORY TYPE 



END 
ELSE 



END 



MOVB #' .MSG015 



TYPE MSG015 
TYPEIT .MSG015 



CVMJAAO riSVll-J MEMORY DIAG. 
PRINT CSR REGISTER MAP 



5572 006170 
006170 

5573 006174 

5574 006176 

5575 006202 
006202 
006206 
006210 

5576 006210 
006210 

5577 006214 

5578 006216 



104401 066060 



000240 
062700 

020027 
001344 



000002 
000040 



104401 071471 

000207 
000000 
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SEQ 0138 



.DSABL CRF 
TYPE MSG014 

TYPEIT .MSG014 

.DSABL CRF 
NOP 

ADD «2.R0 
UNTIL RO EQ «40 



TYPE MSG129 
TYPEIT .MSG129 
.DSABL CRF 
RETURN 
TRACE: .UORD 0 



;TYPE SPACE 



POINT TO NEXT Et ^RY 



E3: 



CMP R0.#40 
BNE 83 



CVMJAAO MSVll-J r«MORY DIAG. 
PRINT CSR REGISTER MAP 

5560 006220 



5581 
5562 
5583 
5584 
5585 
5586 
5587 
5588 
5589 
5590 
5591 



5592 

5593 
5594 

5595 

5596 

5597 
5598 

5599 

5600 

5601 

5602 
5603 

5604 

5605 
5606 

5607 

5608 

5609 
5610 
5611 

5612 



006220 
006220 
006220 
006222 
006224 
006230 
006230 
006232 
006234 
006234 
006240 
006240 
006244 
006244 
006252 
006254 
006254 
006260 
006260 
006262 
006262 
006262 
006266 
006266 
006266 
006266 
006274 
006300 
006300 
006302 
006302 
006304 
006306 
006306 
006310 
006312 
006312 
006316 
006316 
006322 
006324 
006332 
006332 
006332 



010446 
010546 
013746 

010005 
006205 

010537 

010337 

032760 
001403 

012705 

000402 



177640 

002152 
002034 
000001 

017740 



012705 070032 



012737 
040537 

005013 

011304 
040504 

005704 
001410 

005037 

010437 
104035 
042760 



177777 
002322 



002044 
002150 
000010 
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SEQ 0139 



SUBTST <<READ AND WRITE ALL CSR BITS>> 
******************************************************************************* 

♦SUBTEST READ AND WRITE ALL CSR BITS 

THIS ROUTINE "RWCSR" CHECK TO SEE THAT THE CSR CAN BEWRITTEN ON CORRECTLY 
BY WRITING AND CHECKING FOR THE FOLLOWING PATTERNS: 

1- ZEROS 

2 - ONES 

3- SHIFTING A ONE THROUGH A FIELD OF ZEROS 

4- SHIFTING A ZEROS THROUGH A FIELD OF ONES 



a'CSR: 



002462 



002322 



002462 



PUSH R4.R5,UIPAR0 



LET R5 RO 



ASR R5 
LET CSRNO 



iSAVE R4,R5. AND UIPARO ON STACK 

MOV R4. (SP) 
MOV R5. (SP) 
MOV UIPARO. -(SP) 
:GET CSR NUMBER FOR POSSIBLE ERROR 

MOV R0.R5 



= R5 

LET ADDRESS := R3 



MOV R5. CSRNO 

iGET ADDRESS FOR POSSIBLE ERROR 

MOV R3. ADDRESS 

IF OBITO SET. IN CSRINFO(RO) :UHAT KIND OF MEMORY IS THIS??? ;GET BIT MASKS FOR D 

BIT OBITO.CSRINFOCRO) 



LET R5 := #017740 
ELSE 



LET R5 

END 

LET CSRIS 



«070032 



;« #177777 



{MASK FOR MSVll-J 
;IT IS A MSVll-L/P 

MASK FOR MSVll-L/P 
SET CSRIS TO ALL ONES 



L31: 



BEQ L31 
MOV *017740.R5 
BR L32 



BIC R5, CSRIS 
LET (R3) #0 

LET R4 := (R3) 

BIC R5.R4 
IF R4 NE #0 



MOV M70032.R5 



L32: 



CLEAR BITS FOR GOOD DATA 
0 >CSR 

MASK OUT UNWANTED BITS 
DO WE HAVE A CORRECT READ 



LET GOOD := #0 
LET CSR := R4 
ERROR «35 

BIC #BIT3.CSRINF0(R0) ; CLEAR CSR OK BIT 
END 



;GOOD DATA=0'S 
;BAD DATA=CSR 
iBIT SET ERROR 



MOV *177777. CSRIS 

CLR (RS) 
MOV (R3).R4 

TST R4 
BEQ L33 

CLR GOOD 

MOV R4.CSR 



LET (R3) := CSRIS 



iONES >(R3) 



L33: 



^kiM lAAA MClll 1 

CVPIJAAO nsvii-j 


ntnuKT 




READ HNU WHJ.lt 


ALL i.oH 


OTTC 
DX I O 














Uvoooo 


All TAA 






OOSOI 3 






0A0*\04 




3D10 UUOd44 








090437 


Wcdcc 




0O141 1 












01 3737 

UX 0 1 O f 


OOP39P 
WcOcc 










010437 


OOP 1 SO 




104010 






047760 


000010 
wvvxv 








OOA'^74 






SA97 A0f>'^7A 








noso37 

\J\Jj\JO 1 


00PP64 
wcco** 


^A9i nnA^nrt 






wot w 












wvOHVw 


00SP37 


00PP64 

VVCCO"» 


00AA04 






<^nA4n4 


01P737 


177777 










0P37P7 






001003 

WX WW 












01P70P 


000001 


^A9Q OOA4?A 

3DC7 UwDHcO 








00040P 
















OOA430 


01P70P 


177776 


006434 






006434 






■\63? 006434 






006434 






SA33 006434 


005P37 

VV JC^ f 


177640 


^A34 006440 






006440 


0P37P7 

VC w r c ( 


00PP64 
vvccv*t 


006446 


001006 
wx wv 




0064S0 


03P760 

V JC > UV 


000001 


0064S6 


001 OOP 
vvx wc 




■\A3^ 006460 


ft4P70P 

VHC > VC 


040000 


S636 006464 






006464 






^637 006464 






006464 


0P37P7 

VC O 1 C 1 






OO 1 006 




006474 


03P760 

VOC > vV 


00000 1 


006 SO? 


00 1 0OP 
wx wc 




5638 006504 


042702 


040004 


5639 006510 






006510 






5640 006510 






006510 


010213 





Kll 
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002044 



002462 



177640 
000001 



000001 
002462 



000002 
002462 



LET R4 := (R3) 

CLR (R3) 

BIC R5,R4 

IF R4 NE CSRIS 



LET GOOD := CSRIS 
LET CSR := R4 
ERROR *10 

END 

LET PASFLG 
REPEAT 



sMASK OUT CORRECT FIELD 
; CLEAR OUT CSR 

juAS PATTERN WRITTEN CORRECTLY? 



MOV CSRIS. (R3) 
MOV (R3).R4 



BIC «BIT3.CSRINF0(R0} ; CLEAR CSR OK BIT 
«0 



INC PASFLG 

LET UIPARO := 0-1 

IF PASFLG EG «1 



CMP R4, CSRIS 
BEQ L34 

GOOD DATA = ALL LEGAL BITS SET IN CSR 

MOV CSRIS. GOOD 

BAD DATA^CSR 

MOV R4.CSR 

BIT CLEAR ERROR 



L34: 



LET R2 
ELSE 



#1 



LET R2 :» #177776 
END 

REPEAT 

INC UIPARO 



SET UP LOOP COUNTER 

CLR PASFLG 
REPEAT WITH A FIELD OF I'S THROUGH O'S 

6^ • § i I 9 » I 

O'S THROUGH I'S 

INCREMENT LOOP COUNTER 

USE USER PAR FOR BIT COUNTER 

MOV 0-1. UIPARO 

PASS 1 

CMP PASFLG. #1 
6NE L35 

• 1 >FIELD OF ZEROS 

MOV 01. R2 

iPASS 2 

BR L36 

L35::i:;:: 

0 >FIELD OF ONES 

MOV #177776. R2 



DO BITS 0-4 AND 13-15 



L36: 
B5:i 



SEQ 0140 



{INCREMENT BIT POINTER 
IF PASFLG EQ #1 AND #BITO OFF. IN CSRINFO(RO) : 

CMP PASFLG. #1 
BNE L37 

BIT #BITO.CSRINFO(RO) 
BNE L37 

BIC #BIT14.R2 :IF THIS IS PASS 1 ON A MSVll-L/P. CLEAR BIT 14 
END : 

L37:s:j:j: 

IF PASFLG EQ #2 AND #BITO OFF. IN CSRINFO(RO) ; 

CMP PASFLG. #2 
BNE L40 

BIT #BITO.CSRINFO(RO) 
BNE L40 

BIC #BIT14!BIT2.R2 :IF THIS IS PASS 2 ON A MSVll-L/P. CLEAR ECRSRD BIT AND 
END : 

L40: ; 5 ; : : : 

LET (R3) := R2 ; WRITE DATA 

MOV R2,(R3) 



Lll 



CVMJAAO MSVil-J MEMOfiY 


DIAb. 
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READ AND URITE 


ALL CSR 


ATTC 

BITS 






SEQ 


5641 006512 






LET Rl R2 


:GET GOOD DATA AND MASK IT OUT 




006512 


010201 








nOV R2.R1 


5642 006514 


040501 




BIC R5,R1 


iGET GOOD DATA 


5643 006516 






LET R4 :» (R3) 


;GET DATA THAT IS READ 




006516 


011304 






MOV (R3).R4 


5644 006520 


040504 




BIC R5,R4 


;HASK OUT CSR BITS 


5645 006522 






IF Rl NE R4 


;IS DATA CORRECT??? 




006522 


020104 






CMP R1.R4 


006524 


001416 








BPA 1 M • 

BEQ L41 


5646 006526 






LET GOOD := Rl 


;BAD DATA » CSR CONTENTS 




006526 


010137 


002044 






kiAkt n* ^AAA 

MOV Rl.GOOD 


5647 006532 






LET CSR :« R4 


:GET GOOD DATA 


006532 


010437 


AO O 1 CA 

0C21o0 






nOV R4.CSR 


5648 006536 






IF PASFLG EQ #1 


f*^l ^A Y AA A^n^klA Tbi/* Abl A A A 

i SELECT ERROR DEPENDING ON PASS 


006536 


023727 


002264 


A A A A m 

000001 




CnP PASFLG, 01 


006544 


001002 








BNc L42 


5649 006546 


104035 




ERROR '»35 


;BIT SET ERROR 




5650 006550 






ELSE 


jPASS 2 




006550 


AAA d A ■ 

000401 








BR L43 


006552 








L42:;:i 




5651 006552 


104010 




ERROR «10 


;BIT CLEAR ERROR 




5652 006554 






END 






006554 








L43:;;; 




5653 006554 


042760 


AAAA 1 A 


002462 BIC «BIT3.CSRINF0(R0) iCLEAR CSR OK BIT 




5654 006562 






END 






006562 












5655 006562 






IF PASFLG EQ #1 


:GET DATA FOR JSlEXT LOOP 




006562 


023727 


002204 


000001 




CnP rMSrLb,#l 


006570 


001002 








Okie 1 A A 

dNc L44 


5656 006572 


006302 




ASL R2 


: SHIFT 1 ACROSS O'S 




5657 006574 






ELSE 


\ 




006574 


000402 








BR L45 


006576 








L44-;!; 




5658 006576 


AAA'^f « 

000261 




SEC 


:SET CARRY 




5659 006600 


006102 




ROL R2 


: ROTATE A 0 ACROSS A FIELD OF ONES 


5660 006602 






END 






006602 








L45:;s: 




5661 006602 






UNTIL UIPARO EQ #15. 


; UNTIL ALL BITS ARE DONE 




006602 


023727 


1 f f b40 


000017 




CMP UIPARO. #15. 


006610 


001311 








6NE 65 


006612 












5662 006612 






UNTIL PASFLG EQ 02 


:D0NE UITH 2 PASSES 




006612 


023727 


002264 


000002 




CMP PASFLG. #2 


006620 


001267 








BNE B4 


006622 










5663 006622 






IF #BITO SET. IN CSRINFO(RO) THEN JUMPTO DONE sIF MSVll-L/P DO ONE LAST URITE 


006622 


032760 


AAAA A 1 

000001 


002462 




BIT #BITO,CSRINFO(RO) 


006630 


001402 








BEQ LSO 


006632 


000137 


AA£ ^ AA 

006700 






JMP DONE 


006636 










5664 006636 






LET CR3) :« #140005 


: URITE ONES TO CSR UITH ECSRRO BIT ENABLED 


006636 


012713 


14U003 






MOV #140005. (H3) 








LET R2 := (R3) 


:READ CSR FOR CORRECT BITS 




006642 


011302 








MOV (R3).R2 


5666 006644 


042702 


037772 


BIC #37772. R2 


{CLEAR UNUANTED BITS 




5667 006650 






IF R2 NE #140005 


:UAS URITE CORRECT 




006650 


020227 


140005 




CMP R2. #140005 



CVnjAAO 


MSVll-J 


MEMORY 


0IA6. 


READ AND MITE 


ALL CSR BITS 




006654 


001411 




5660 


006656 








006656 


012737 


140005 


5669 


006664 








006664 


010237 


002150 


5670 


006670 


104010 




5671 


006672 


042760 


000010 


5672 


006700 








006700 






5673 


006700 








006700 


005013 




5674 


006702 








006702 


012637 


177640 




006706 


012605 






006710 


012604 




5675 


006712 


000207 





Mil 
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LET GOOD := *140005 ;GOOD DATA 

002044 

LET CSR := R2 :BAD DATA 

ERROR *10 :BIT CLEAR ERROR 

BIC «BIT3,CSRINF0(RO) sCLEAR CSR OK BIT! 



END 

DONE: LET (R3) 90 

POP UIPAR0,R5,R4 

RETURN 



L51: 



: CLEAR OUT CSR 
: RESTORE UIPAR0.R4, AND R5 



BEQ L51 

MOV «140005.6000 
MOV R2.CSR 



CLR (R3) 

MOV (SP).,UIPARO 
MOV (SP)*.R5 
MOV (SP)*,R4 



SEQ 0142 



cvnjAAo nsvii-j mehory oiag. 

READ AND URITE ALL CSR BITS 



Nil 

HACRO VOS.Olb Friday lS-Fcb-85 16:10 Page 



150 



5678 








:THE 


FOLLOUING ROUTINE DETERMINES 


5679 








f 

CTEST 






5600 006714 


104424 






: CACHOFF 




5661 006716 


012737 


mm 


002532 




MOV 


0177777. PGMCSR 


5602 006724 


012737 


002000 


172350 




MOV 


«2000.KIPAR4 


5603 006732 


012701 


002412 






MOV 


#TESTADD,R1 


5604 006736 


012737 


100000 


002412 




MOV 


#100000, TESTADD 


5605 006744 


012737 


100002 


002414 




MOV 


0100002. TESTA00*2 


5606 006752 


005000 








CLR 


RO 


5607 006754 


005037 


002152 






CLR 


CSRNO 


5608 006760 


013703 


002224 






MOV 


T0TCSRS,R3 


5609 006764 


000240 








NOP 




5690 006766 
j691 006770 


006303 






4$: 


ASL 


R3 


103407 








BCS 


2i 


5692 006772 


062700 


000002 




1$: 


ADO 


«2.R0 


5693 006776 


010037 


002152 






MOV 


RO, CSRNO 


5694 007002 


005703 








TST 


R3 


5695 007004 


001465 








BEQ 


3< 


5696 007006 


000767 








BR 


4$ 


5697 007010 


000240 






2$: 


NOP 




5696 007012 


000241 








CLC 




5699 007014 


032760 


000001 


002462 




BIT 


#6IT0.CSRINF0(R0) 


5700 007022 


001014 








BNE 


5i 


5701 007024 


052760 


000004 


172100 




BIS 


«BIT2.CSRA00(R0) 


5702 007032 


012771 


123456 


000000 




MOV 


«123456,S(R1) 


5703 007040 


012771 


123456 


000002 




MOV 


«123456.82(R1) 


5704 007046 


005060 


172100 






CLR 


CSRAOO(RO) 


5705 007052 


000414 








BR 


6$ 


5706 007054 


012760 


000000 


172100 


5* : 


MOV 


«0,CSRADD(RO) 


5707 007062 


012771 


123456 


A A A A A A 

000000 




MOV 


0123456, 9(R1) 


5700 007070 


012771 


123456 


000002 




MOV 


41234 56. S2(R1) 


5709 007076 


012760 


020006 


172100 




MOV 


«200O6.CSRA00(R0) 


5710 007104 


005771 


000000 




6$: 


TST 


9(R1) 


5711 007110 


016004 


172100 






MOV 


CSRA0D(R0),R4 


5712 007114 


032760 


000001 


002462 




BIT 


*BIT0.CSRINF0(R0) 


5713 007122 


001003 








BNE 


7* 


5714 007124 


005704 








TST 


R4 


5715 007126 


100412 








BMI 


81 


5716 007130 


000720 








BR 


1$ 



CSR CONTROLS PROGRAM SPACE 



5 SET UP MAP REGISTER 



CLEAR CSR COIMTER 

OBTAIN CSR MAP 
DEBUG AID 

PUT HIGH ORDER BIT INTO C BIT 
BRANCH IF CSR EXISTS 
UPDATE CSR COUNTER 

IS MAP EMPTY? 
BRANCH IF SO 

DEBUG AID 
CLEAR CARRY 

IS THIS PARITY MEMORY? 
BRACH IF NOT 
SET URITE URONG PARITY 
URITE DATA 

RESTORE CSR 

CLEAR THE CSR UNDER TEST 
URITE DATA 

SET DIAG CHECK MODE 
URITE CHECKBITS TO CSR 
URITE CSR TO R4 
PARITY MEMORY? 
BRANCH IF NOT 
PARITY ERROR? 
BRACH IF SO 
TRY NEXT CSR 



CVHJAAO fISVll-J HEnORY OIAG. 
READ AND UAITE ALL CSA BITS 



B12 
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5717 

5718 

5719 

5720 

5721 

5722 

5723 

5724 

5725 

5726 

5727 

5726 

5729 

5730 

5731 

5732 



007132 000240 71: 

007134 072427 177773 

007140 04270^, 177700 

007144 0127^2 000040 

007150 020204 

007152 001307 

007154 010037 002532 8>: 

007160 000240 31 : 

007162 104502 

007164 012771 000000 000000 

007172 012771 000000 000002 

007200 023/27 002532 177777 

007206 001402 

007210 000137 007232 

007214 012737 001000 172350 FINT»: 

00722L' 

007222 104401 071264 



5733 007226 005037 002532 



NOP 








DIL 




MAW 

nuv 


•40, n2 


CnP 


k2,R4 


Bur 


1* 


nuv 




kino 




d D^CD 

LLKLan 




nuv 


W.SlKl J 






CMP 


PGMCSR. #177777 


BEQ 


FINTI 


JMP 


CLRMEM 


MOV 


#1000.KIPAR4 


TYPE 


MSG126 


TYPEIT 


.MSG126 


.DSABL 


CRF 


CLR 


PGMCSR 



.-DEBUG AID 



:LQAO IN CORRECT CHECK BITS FOR MSVll 
: CORRECT CHECKBITS7 
.BRANCH IF NOT 

: DEBUG AID 

; CLEAR ALL CSR'S 

:REST0RE TEST LOCATIONS 



IF PROGRAM CSR NOT FOUND GO TO FINT 
GO TO SIZING ROUTINE IF FOUND 

ERROR - PROGRAM CSR NOT FOUND! 



:SET TO DEFAULT OF 0 



CVMJAAO MSVll-J MEMORY OIAG. 
READ AND URITE ALL CSR BITS 

5735 007232 



5736 
5737 
5738 
5739 
5740 
5741 



C12 
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SEQ 0145 



5742 007232 








CLRMEM: 


SET4 


OCLREX 


007232 


012737 


007342 


000004 




MOV 


0CLREX.4 












.OSABL 


CRF 


5743 007240 


005037 


006216 






CLR 


TRACE 


5744 007244 


012737 


000001 


002076 




MOV 


»1.N0PAR 


5745 007252 


012737 


002000 


172350 




MOV 


02000.KIPAR4 


5746 007260 


012701 


lOOCOO 






MOV 


0100000. Rl 


5747 007264 


020127 


117776 




1$: 


CMP 


Rl. 0117776 


5748 007270 


001003 








BNE 


2$ 


5749 007272 


012737 


177777 


006216 




MOV 


0-1. TRACE 


5750 007300 


005021 






2$: 


CLR 


(RD* 


J ijl \J\J 1 3\JC 


\J\Jj 1 3 1 








TQT 




5752 007306 


001001 








BNE 


3« 


5753 007310 


000765 








BR 


li 


5754 007312 


062737 


000200 


172350 


3$: 


ADD 


#200.KIPAR4 


5755 007320 


022737 


177600 


172'50 




CMP 


0177600. KIPAR4 


5756 007326 


001405 








6EQ 


CLREX 


5757 007330 


005037 


006216 






CLR 


TRACE 


5758 007334 


012701 


100000 






MOV 


0100000. Rl 


5759 007340 


000751 








BR 


1$ 


5760 007342 


000240 






CLREX: 


NOP 




5761 007344 


005037 


006216 






CLR 


TRACE 


5762 007350 










RES4 




007350 


012737 


034114 


000004 




MOV 


OTIME0UT,4 


007356 


022737 


000005 


004010 




CMP 


OS.PROTYP 


007364 


001002 








BNE 


101$ 


007366 


005037 


177766 






CLR 


CPUERR 


007372 








101$: 
















.DSABL 


CRF 



SUBTST <<CLtAR ALL MEMORY SPACE FROM BANK 2 0N>> 

********* 

*SUBTEST CLEAR ALL MEMORY SPACE FROM BANK 2 ON 

******************************************************************************* 

THIS ROUTINE CLEARS ALL MEMORY SPACE BEGINNING AT ADDRESS 200,000 AND 
CONTINUES UNTIL THERE IS NO MEMORY LEFT. IT SHOULD CLEAR ANY PARITY ERRORS 
CREATED BY THE LAST ROUTINE. AND CLEAN UP ANY JUNK LEFT HANGING AROUND IN 
HIGHER MEMORY. 

iNONEM TRAPS GO TO CLREX 



IGNORE PARITY ERRORS 

SET UP MAP TO START AT BANK 2 

Rl MAPS TO KIPAR4 

WHOLE 16K BANK DONE? 

KEEP GOING IF NOT 

USE TRACE FLAG TO FLAG END OF BANK 

CLEAR CONTENTS £ INCREMENT 

EOB FLAG SET? 

GO TO NEXT BANK IF SO 

SET MAP FOR NEXT BANK 

ARE UE AT THE PERPHERIAL PAGE 

YES -GO ON 

RESET FLAG 

RESET Rl 

CLEAR NEXT BANK 



sIS THIS AN 11/83/84 ? 
: BRANCH IF NOT 

; CLEAR OUT THE CPU ERROR REGISTER BITS 
;THAT A EXPECTED TRAP COULD HAVE SET 
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SEQ 0146 



5765 007372 



5766 
5767 
5768 
5769 
5770 
5771 
5772 
5773 
5774 
5775 
5776 
5777 
5778 
5779 
5780 
5781 
5782 
5783 
5784 
5785 
5786 
5787 
5788 
5789 



ANA2: SUBTST <<MATCH ALL GSR'S WITH MEM0RY>> 
************************** 

SUBTEST MATCH ALL CSR'S WITH MEMORY 

******«***««**************«****•************««**««««*****«•**««««*«**««««««*«« 

THE SECOND PART OF THE ANALYSIS MATCHES UP THE CSR'S UITH THE MEMORY. AND 
INSTALLS ALL THE INFORMATION FOUND IN THE CONFIGURATION TABLE. FOR ECC. 
THIS IS DONE BY TAKING EACH CSR FOUND IN THE PREVIOUS SECTION SEQUENTIALLY 
AND CHECKING THROUGH ALL OF MEMORY. ONE BANK AT AT TIME. TO SEE WHICH BANKS 
RESPOND TO THE CSR IN QUESTION. THE FIRST DOUBLE WORD PAIR IN EACH BANK IS 
WRITTEN WITH DATA AND DIAGNOSTIC CHECK MODE SET IN THE CSR AND ARE CHECKED 
FOR EACH BANK THROJGH USE OF TESTADD AND KERNEL INSTRUCTION PAGE ADDRESS 
REGISTERS 4 AND 5. IF WE GET THE PROPER CHECKBITS BACK. WE HAVE A MATCH. 
IF NOT. THE ROUTINE CHECKS FOR SINGLE OR DOUBLE BIT ERRORS. 
IF ONE OR THE OTHER IS FOUND. THE ERROR ADDRESS IS CHECKED 
TO SEE IF IT IS THAT BANK. IF IT IS. WE HAVE A MATCH. AT THE END OF EACH 
BANK PASS. FOR EACH CSR PASS. THE PROGRAM rOMFS UP WITH A NUMBER. STORED IN 
"I". WHICH DENOTES THE FOLLOWING: 

I MEMORY DESCRIPTION 

0 NON-EXISTANT MEMORY 

1 MSVll-L/P MEMORY 

2 MSVll-J MEMORY 

NOTE THAT PARITY MEMORY WRITES WRONG PARITY TO THE DOUBLE WORDS. THEN LOOKS 
FOR THE PARITY ERROR BIT TO BE SET. IF THE BIT IS SET. WE HAVE A MATCH. 



5790 


007372 










SET4 


«100$ 


;NE MEMORY TRAPS GO TO 100$ 




007372 


012737 


010444 


000004 




MOV 
.DSABL 


#100$. 4 
CRF 




5791 


007400 


005037 


002314 






CLR 


CHECK 


"CLEAR CHECK 


5792 


007404 


012701 


002412 






MOV 


OTESTADD.Rl 


!SET UP THE VIRTUAL ADDR. POINTER 


5793 


007410 


013703 


002224 






MOV 


T0TCSRS.R3 


iMOVE CSR MAP INTO R3 


5794 


007414 


005000 








CLR 


RO 


i CLEAR THE CSR POINTER 


5795 


007416 


005005 








CLR 


R5 


(CLEAR THE PROGRAM CSR STATUS POINTER 


5796 


007420 


005737 


002454 






TST 


N022BIT 


iOO WE HAVE 22 BIT ADDRESSING ? 


5797 


007424 


001403 








BEQ 


7$ 


[BRANCH IF WE DO 


5798 


007426 


005037 


002560 






CLR 


LASTBLOCK 


! ADJUST LASTBLOCK INDICATOR FOR 124K MACHINE 


5799 


007432 


000413 








BR 


U 


•BRANCH OVER NEXT PIECE OF CODE 


5800 


007434 


022737 


000177 


002556 


7$: 


CMP 


#177.LASTBANK 


IS THERE Q-BUS MEMORY ABOVE 17776000? 


5801 


007442 


001407 








BEQ 


1$ 


BRANCH IF NOT 


5802 


007444 


013702 


002556 






MOV 


LASTBANK.R2 


SET UP A NEW LAST BLOCK INDICATOR 


5803 


007450 


005202 








INC 


R2 




5804 


007452 


072227 


000011 






ASH 


#9.,R2 




5805 


007456 


010237 


002560 






MOV 


R2. LASTBLOCK 




5806 


007462 


012702 


000004 




lit 


MOV 


«4,R2 


R2 IS INDEX FOR CONFIG TABLE 


5807 


007466 


005037 


002564 






CLR 


ENOFLG 


CLEAR END OF MEMORY FLAG 


5808 


007472 


012737 


001000 


172350 




MOV 


OlOOO.KIPARf 


SET KIPAR4 FOR BANK 1 


5809 


007500 


012737 


001000 


172352 




MOV 


01000. KIPAR5 


SET KIPAR5 FOR BANK 1 


5810 007506 


006303 






2$: 


ASL 


R3 


DOES THIS CSR EXIST? 


5811 


007510 


103420 








BCS 


3$ 


BRANCH IF IT DOES EXIST 


5812 


007512 


062700 


000002 






ADD 


#2.R0 


INCREMENT THE CSR POINTER 


5813 


007516 


010037 


002152 






MOV 


RO.CSRNO 


STORE IT IN CSRNO ALSO 


5814 


007522 


005703 








TST 


R3 i 


ARE THERE ANY MORE CSR'S TO DO? 


5815 


007524 


001370 








BNE 


2$ i 


BRANCH IF ALL CSRS NOT DONE 


5816 


007526 


012737 


001000 


172350 




MOV 


01000. KIPAR4 i 


RESTORE KIPAR4 



E12 
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5817 007534 


012737 


001200 


172352 




MOV 


#1200,KIPAR5 


5818 007542 


013706 


002574 






MOV 


KSTACK.SP 


5819 007546 


000137 


010454 






JMP 


SUBAAS 


5820 007552 


010037 


002152 






MOV 


RO.CSRNO 


5821 007556 


104424 






13* : 


A Wk Ai aA^^ 

CACHOFF 


5822 007560 


000240 








NOP 




5823 007562 


A « A^ 

012737 


100000 


002412 


45* : 


MOV 


mm AAAAA V^^YHAA 

#100000, TEST ADD 


5824 007570 


012737 


■ 'HA A A 

120002 


002414 




MOV 


#120002 , TEST ADO* 2 


5825 007576 


032762 


A A A A A A 

000040 


002664 




BIT 


H A Y Y ^ A A ^ 1^ V A # A X 

»BIT5,C0NFIG(R2) 


5826 007604 


A A • AAA 

001402 








BEO 


43* 


5827 007606 


AAA 4 

000137 


010342 






JMP 


6* 


5828 007612 


AAif A 

005037 


A A O A C 

002452 




43* : 


CLR 


I 


VA'^A AA^f 4 £ 

5829 007616 


005771 


AAAAAA 

000000 




4* : 


TST 


a(Ri) 


VaVA aa^^ aa 

5830 007622 


AAP A 

005237 


002452 






INC 


I 


VAV* AA^f A£ 

5831 007626 










PUSH 


S(R1),S2(R1) 


AA^f A£ 

007626 


017146 


AAAAAA 

000000 










AA^f V A 

007632 


A 4 ^ 4 M ^ 

017146 


A A A A A 

000002 










VAVA AA^f V£ 

5832 007636 


AV A^f A 

032760 


A A A A A 4 

000001 


002462 




ATT 

BIT 


#BIT0,CSRINF0(R0j 


AA^f il il 

5833 007644 


A A 4 A 4 A 

001014 








BNE 


V il A 

34* 


AA*9£il£ 

5834 007646 


AP A 

052760 


AAAAAil 

000004 


4 ^ O 4 A A 

172100 




O T f* 

BIS 


#BIT2,CSRADD(R0j 


f AVif AA*9£ifil 

5835 007654 


A 4 4 

012771 


4 O V il C£. 

123456 


AAAAAA 

000000 




MOV 


#123456, 9(R1 J 


5836 007662 


A 4 A^*9 4 

012771 


1 A V il C£ 

123456 


AAAAAA 

000002 




nOv 


JL4 07ilC£ AO/n4 \ 

#123456, S2CR1 J 


paw AA*9£ ^A 

5837 007670 


A AC A£ A 

005060 


4 ^ A 4 A A 

172100 






CLK 


^CO AAA^ DA ^ 

CSRAOOCRO J 


CAVA AA^f^il 

5838 007674 


AAAil 4 4 

000411 








dK 


il 1 A 
41* 


5839 007676 


012771 


4 "^Til C£ 


AAAAAA 

000000 


Til A 

34 ♦ : 


nov 


JL4')TilC£. "^^04 ^ 

#123456, d(Rlj 


5840 007704 


A 4 Ol^^ 4 

012771 


123456 


AAAAAA 

000002 




MAI/ 

nuv 


#123456, S2(R1 J 


5841 007712 


4 Ail CAV 

104503 








Pl D 4 PCD 




5842 007714 


4 Ail il 

104475 








PD 1 P CO 




5843 007716 


AAA Ail A 

000240 








LIAD 

NOr 




BAAil AA^^AA 

5844 007720 


005771 


AAAAAA 

000000 




41* ; 


T CT 


9(R1 J 


5845 007724 


• Ail A 

104426 








KtnULoK 




5846 007726 


AAA'^il A 

000240 








NUr 




5847 007730 


A1 T^Ail 

013704 


AA^ 4 CA 

002150 






MOW 

nuv 




5848 007734 


AAA^il A 

000240 








MnD 
NUr 




5849 007736 


A % Ail 

010437 


AA^il Til 

002434 






nuv 


K4 , 1 tnr 


5850 007742 


4 Ail CAT 

104503 








lLKIloK 




5851 007744 










DAD 

rUr 


MeV.Kl J,MlNl J 


007744 


A 4 Of 4 

012671 


AAAAAA 

000002 










007750 


A 4 A£ ^ 4 

012671 


AAAAAA 

000000 










5852 007754 


A V A 

032760 


AAAAA 4 

000001 


AA'^il C ^ 

002462 




DTT 

BIT 




5853 007762 


AA 4 AA4 

001004 








dNc 


il ^ 4 
42* 


5854 007764 


AAC9 Ail 

005704 








T CT 

TST 


Oil 

K4 


5855 007 '66 


4 AAil AA 

100420 








DMT 

bni 


25* 


PAiP^ AA*d^^A 

5856 00/770 


AAA 4 W 

000137 


010342 






IMD 

jnp 


6* 


58j7 007774 


A*V 

072427 


177773 




42* : 


A CU 

ASH 


Jl C Oil 

#-5,R4 


PaVA A • A A A A 

5858 010000 


AA A'9A4 

042704 


177700 






OTP 

Die. 




iPAPA AtAAA^ 

5859 010004 


012737 


A A A A M A 

000040 


AA V 4 £ 

002316 




MOV 


#40.CBITS 


ifA^A AtAAtA 

5860 010012 


A A A A A 

000240 








NOP 




4 A4AA4A 

5861 010014 


A A V^Ail 

023704 


AA AT 4 £ 

002316 




77* : 


CMP 


CBITS.R4 




AAAO^ A 








NOP 




5863 010022 


001402 








BEQ 


25* 


5864 010024 


000137 


010170 






JMP 


22* 


5865 










i* 




5866 










:* WE COME HERE IF THERE I 


5867 










;* 
MOV 




5868 OlOOiO 


010004 






25*: 


R0.R4 


5869 010032 


000240 








NOP 
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SEQ 0147 

.•RESTORE KIPAR5 
i RESTORE STACK 

:JUMP TO SUBAAS IF ALL CSR'S ARE DONE 
:MAKE SURE CSRNO IS UPDATED 
sTURN THE CACHE OFF 

:SET UP VIRTUAL ADDRESS TO KIPAR4 

;SET UP VIRTUAL ADDRESS TO KIPAR5 

;IS THIS A BANK TO SKIP ECC/LOGIC TESTS? 

;N0 - BRANCH AROUND NEXT INSTRUCTION 

iYES - GO TO END OF BANK 

; CLEAR THE MEMORY CONFIGURATION COUNTER 

.TEST TO SEE THAT THERE IS MEMORY PRESENT 

; MEMORY PRESENT 

iSAVE THE LOCATIONS UNDER TEST 

MOV a(Rl).-(SP) 
MOV a2(Rl).-(SP) 

sis THIS PARITY MEMORY? 

iNO - BRANCH 

sSET WRITE WRONG PARITY 

sSET THE FIRST LOCATION UNDER TEST 

;SET THE SECOND LUT 

; CLEAR THE CSR 

sTEST LOCATIONS 

;SET THE FIRST LOCATION UNDER TFST 
sSET THE SECOND LUT 
'RESET CSR 

iSET DIAG. CHECK MODE IN C£R UNDER TEST 
; DEBUG AID 

;READ THE FIRST LUT TO WRITE CKBITS. INTO CSR 
sREAD THE CSR UNDER TEST 
{DEBUG AID 

;GET THE CHECKBITS FROM THE CSR 
: DEBUG AID 

;SAVE IN TEMP FOR LATER 
'RESET CSR 

i RESTORE LOCATIONS UNDER TEST 

MOV (SP)*.a2(Rl) 
MOV (SP)*,a(Rl) 

:IS THIS PARITY MEMORY? 
:N0 - BRANCH 

sDID WE GET A PARITY ERROR? 
:YES - FILL IN CONFIG TABLE 
;N0 - JUMP TO END OF BANK 
; MANIPULATE THE CSR BITS 
:INTO A USABLE FORM. 
:MSV11-J CHECK BITS 
sOEBBUGGING AIDE 

;D0 THE CHECKBITS COMPARE TO WHAT WAS WRITTEN? 
:DEBBUG AIDE 

: BRANCH IF THERE IS A MATCH 
;ELSE BRANCH IF NOT THE SAME 

A MATCH 

sGET THE CSR NUMBER 



CVnjAAO MSVll-J 
MATCH ALL CSR'S 

5870 010054 

5871 010036 

5872 010040 

5873 010044 
5674 010050 

5875 010054 

5876 010060 

5877 010062 
5878 

5879 
5880 

5881 010066 

5882 010074 

5883 010076 

5884 010102 

5885 010110 

5886 010112 

5887 010116 

5888 010122 
5869 010126 

5890 010130 

5891 010136 

5892 010142 
010142 

5893 010150 

5894 010156 

5895 010164 

5896 010166 
5897 

5898 
5899 

5900 010170 

5901 010176 

5902 010200 

5903 010202 

5904 010206 

5905 010214 
010214 
010216 

5906 010220 

5907 010224 

5908 010230 

5909 010234 

5910 010242 

5911 010246 

5912 010254 

5913 010260 

5914 010262 

5915 010264 

5916 010266 

5917 010270 
010270 
010272 

5918 010274 

5919 010300 

5920 010304 

5921 010306 



MEMORY OIAG. 
WITH HEnORY 
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006204 
000304 
042704 
050462 
016004 
042704 
000304 
050462 



022737 
001402 
000137 
032737 
001417 
013704 
072427 
022704 
003010 
052762 
105262 

012737 
053737 
053737 
000240 
000465 



032737 
001001 
000460 
013704 
042764 

010046 
010146 
016401 
072127 
042701 
052764 
016400 
042764 
042700 
006300 
006300 
060001 
010104 

012601 
012600 
072427 
020437 
001001 
000403 



170377 
002664 
002462 
177770 

002666 



001000 

010342 
100020 

002434 

177767 
000001 

000001 
002666 

177777 
002670 
002672 



100020 



002152 
000006 



172100 
177773 
177600 
040000 
172100 
040000 
177037 



000005 
172350 



SEQ 0148 



15*; 



172350 24$; 
002434 30$ : 

002664 



002450 
002664 10$ ; 
002666 



002150 22$; 

8$: 



172100 



172100 
172100 



27$; 



ASR 

SUAB 

BIC 

BIS 

MOV 

BIC 

SUAB 

BIS 

s* 

:* THIS 
i* 
CMP 
BEQ 
JMP 
BIT 
BEQ 
MOV 
ASH 
CMP 
BGT 
BIS 
TNCB 
SET 



R4 
R4 

#170377. R4 

R4.C0NFIG(R2) 

CSRINF0(R0),R4 

#tC7.R4 

R4 

R4.C0NFIG*2(R2) 



SET IT UP FOR USE IN THE 

CONFIGURATION TABLE. 

CLEAR OFF EXTRANEOUS BITS 

PUT CSR NUMBER IN CONFIG. TABLE 

GET MEMORY TYPE 

CLEAR OFF THE EXTRANEOUS BITS 

MOVE INTO PROPER POSITION 

SET IT INTO THE CONFIG TABLE 



SECTION IS EXECUTED ONLY WHEN THE BANI<=1 



BIS 

BIS 

NOP 

BR 

i* 

;* IF 
;* 

BIT 

SNE 

BR 

MOV 

BIC 

PUSH 



MOV 
ASH 
BIC 
BIS 
MOV 
BIC 
BIC 
ASL 
ASL 
ADO 
MOV 
POP 



ASH 
CMP 
BNE 
BR 



»1000,KIPAR4 

30$ 

6$ 

#BIT15!BIT4,TEMP 
10$ 

TEMP,R4 
#-9..R4 
ffl.R4 
10$ 

#BIT0,C0NFIG(R2) 
CONFIG ♦2(R2) 
CONFGERROR 

C0NFIG*4, CONFIG 
C0NFIG«6,C0NFIG»2 



6$ 



IS THIS BANK 1 ? 
BRANCH IF TRUE 

ELSE JUMP TO END OF THIS BANK 

UAS THERE A SBE OR QBE? 

BRANCH IF NOT 

GET CSR CONTENTS 

MAKE ERROR ADDRESS INTO BANK » 

ERROR IN BANKS 0 OR 1? 

BRANCH IF NOT 

SET ERROR FLAG IN CONFIG TABLE 
ADD ONE TO BANK ERROR COUNT 
PRINT CONFIG TABLE 

MOV # 1. CONFGERROR 
:SET UP INFORMATION IN BANK ZERO 

: DEBUG AID 
{BRANCH 



CHECKBITS DID NOT MATCH. UE COME HERE 



0BIT15!BIT4.CSR 

8$ 

6$ 

CSRN0.R4 

#6.CSRADD(R4) 

RO.Rl 



CSRADD(R4).R1 

#-5.Rl 

#tC177.Rl 

#BIT14.CSRADD(R4J 

CSRA00(R4),R0 

#BIT14.CSRADD(R4) 

#tC740.R0 

RO 

RO 

RO.Rl 
R1.R4 
Rl.RO 



SBE OR DBE FLAGS SET? 
BRANCH IF TRUE 

CHECK TO SEE IF IT IS MSVll J 
GET CSRNO 

TURN OFF DIAG CHECK £ ECC DISABLE 
SAVE RO L Rl 



:GET CSR INFORMATION 
:SET UP ERROR ADDRESS 



MOV RO. (SP) 
MOV Rl.-(SP) 



GET EXTENDED ERROR ADDRESS BITS 
READ FROM CSR 
TURN OFF EQB BIT 
SET UP EXTENDED BITS 



SET UP TOTAL 
SAVE IN R4 
RESTORE RO € 



ERROR ADDRESS 
Rl 



#5.R4 
R4.KIPAR4 
28$ 
35$ 



MOV (SP)».R1 
MOV (SP)*,RO 
SET ERROR ADDRESS UP IN PAR NOTATION 
DOES IT EQUAL KIPAR4? 
BRANCH IF FALSE 

YES - MARK INFO IN CONFIG TABLE 
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MATCH ALL CSR'S UITH MEMORY 



5922 


010310 


020437 


172352 




28$ : 


CMP 


R4,KIPAR5 


5923 


010314 


001012 








BNE 


6$ 


5924 


010316 


052762 


AAAAA • 

000001 


002664 


35$ : 


BIS 


#BIT0.C0NFIG(R2) 


5925 


010324 


105262 


002666 






INCB 


C0NFIG»2(R2) 


5926 


010330 
010330 


012737 


mm 


002450 




SET 


CONFGERROR 


5927 


010336 


AAA • ^ "I 

000137 


A • A A 9 A 

010030 






JMP 


25$ 


5928 












;* 




5929 












:*ENO OF BANK ROUTINE 


CAVA 

5930 












!* 

CLRICSR 




5931 


010342 


1 Ail CAT 

104503 






6« : 




5932 


010344 


005737 


002564 






TST 


cNDFLb 


f A W 

5933 


010350 


AA t A^ t 

001021 








Due 




5934 


010352 


062 '02 


AAAAA Jl 

000004 






Ann 
ADD 


*4 ,R2 


5935 


010350 


At ^^T^ 

062737 


AAA 

001000 


172350 




Ann 




5930 


010364 


Al T^T^ 

013737 


1 T5TCA 

17^350 


172552 




MOV 


KIPAR4.KIPAR5 


C AV^ 

5937 


A t A V ^ ^ 

010372 


022737 


i ^^AAA 

177000 


172350 




CMP 


#177000, KIPAR4 


CAV A 

5938 


010400 


AA 4 A AC 

001005 








BNE 


70$ 


cava 
5939 


A1 Ail 
A1 Ail A^ 

010402 


012737 


11 1 1 1 1 


AAOC£.i1 

002jo4 




SET 


ENDFLG 


59«»0 


A 1 Ail 1 A 

010410 


AAA 1 T ^ 

0001 3 ' 


00 '3o2 






JMP 


45$ 


5941 


A 1 f\A 1 il 

010414 


Oe3 r 3 ' 


AAOC£.A 

002300 


172330 


70$: 


CMP 


LASTBLGCK.KIPAR4 


5942 


A 1 Ail 

010422 


1 A 1 il A^ 

101402 








BLOS 


19$ 




\JX\JHC*f 


ones 1 '^7 








JMP 


45$ 


5944 


010430 


062700 


000002 




19$: 


ADO 


«2.R0 


5945 


010434 


000240 








NOP 




5946 


010436 


104423 








CACHON 




5947 


010440 


000137 


007462 






JMP 


1$ 


5948 










100$: 






5949 


010444 


062706 


000004 




ADO 


#4.SP 


5950 


010450 


000137 


010342 






JMP 


6$ 



SEQ 0149 

:DOES IT EQUAL KIPAR5? 

;BR'\NCH IF FALSE 

:SET BANK ERROR FLAG 

; INCREMENT BANK ERROR COUNTER 

; PRINT CONFIG TABLE 

MOV #-1. CONFGERROR 
:YES MARK INFO IN CONFIG TABLE 



CLEAR THE CSR UNDER TEST 

ARE WE AT TOP OF MEMORY? 

IF SO THEN EXIT 

UPDATE CONFIGURATION POINTER 

UPDATE KIPAR4 TO NEXT BANK 

AND UPDATE KIPAR4 

ARE WE AT BANK 177 

BRANCH IF NOT 

WERE AT LAST BANK 

MOV #-1. ENDFLG 

HAVE WE DONE THE WHOLE MEMORY SPACE? 

BRANCH IF DONE jR-C 

JUMP IF NOT DONE 

INCREMENT CSR POINTER 

DEBUG AID 

TURN ON THE CACHE 

JUMP TO TRY NEXT CSR 

RESTORE STACK ;R-C 
GO TO END OF BANK ROUTINE ;R-C 



CvrjAAO HSVll-J MEMORY DIAG. 
MATCH ALL CSR'S WITH MEMORY 

5952 010454 104423 

5953 010456 104472 

5954 010460 



5955 
5956 
5957 
5958 
5959 
5960 



010460 000004 
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SUeAAS: CACHON :MAKE SURE THE CACHE IS ON 

ECCINIT :TRAP ON DOUBLE BIT ERRORS (NORMAL) 

NEUTST <<TEST BANK 0 ACCESSES>> 

: ******************************************************************************* 

:*TEST 2 TEST BANK 0 ACCESSES 



SEQ 0150 



TST2: 



5961 


010462 


AAC A 

005037 


AA '\A^ ^ 

002072 




5962 


A i A Jl £ £ 

010466 


012737 


AAAAA 4 

000001 


A A «^ A^^ 

002076 


5963 


010474 


AACAT'7 

005037 


AA ^A^A 

002070 




5964 


A \ ACAA 

010500 


012737 


AAAAA 4 

000001 


AA ^ 4 A A 

002100 


5965 


A 1 ACA£ 

010506 










010506 


012737 


034050 


000004 


596o 


A 1 AC % A 

010514 


AACAAA 

005000 








At AC \ C 

010516 


Af "^^Af 

012701 


Ail AAAA 

040000 




e Az. a 

5968 


A • AP ^ ^ 

010522 


• Ail A^A 

104424 






5969 


010524 


AAC^'^A 

005720 






5970 


A \ AC 

0105c6 


A77 * A'5 

077102 






5971 


A \ ACTA 

010550 


■ Ail il 

104423 






5972 










5973 


A \ ACT ^ 

010532 


005737 


AA'^A^^ 

002072 




5974 


010536 


001403 






5975 


A t ACil A 

010540 










010540 


005237 


002064 






010544 


104003 






5976 


010546 


005737 


002070 




5977 


A « ACO 

010552 


AA 4 il 

001406 






e A^ a 

5978 


A« ACCil 

010554 


162737 


AAAAA^ 
000002 


AA^ATA 

002034 


5979 












010562 


005237 


002064 






010566 


104004 






5980 


010570 


053737 


002106 


002664 


5981 


010576 










010576 


012737 


034114 


000004 




010604 


022737 


000005 


004010 




010612 


001002 








010614 


005037 


177766 






010620 








5982 










5983 


010620 








5984 


010620 










010620 


032777 


000001 


172010 




010626 


001003 







2i: 



101* i 



SCOPE 

THIS DOES A "TST" INSTRUCTION ON EVERY LOCATION IN BANK #0 TO SEE 
IF IT GETS ANY PARITY TRAPS. 

SINCE EVERY LOCATION IS EITHER LOADED OR WRITTEN INTO BY THE PROGRAM 
PRIOR TO THIS POINT - THEN A PARITY ERROR IMPLIES THAT THERE IS A 
HARDWARE FAILURE IN THE MEMORY. 

THESE ERRORS ARE COUNTED AND A FATAL ACTION IS TAKEN 

CLEAR PARITY ERROR COUNTER 
SET THE NO PARITY ERROR FLAG 
CLEAR NON-EXISTANT MEMORY ERROR COUNTER 
SET THE NON-EXISTANT MEMORY ERROR MODE TO COUNT 
TRAPS TO 4 GOTO NONEXIST 



PARCNT 
Ol.NOPAR 
NEMCNT 
W.NONEM 
#NONEXIST 
#N0NEXIST.4 
CRF 
RO 

tfSIZE.Rl 

(RO)* 
Rl.l* 



CLR 
MOV 
CLR 
MOV 
SET4 
MOV 
.DSABL 
CLR 
MOV 

CACHOFF 
TST 
SOB 

CACHON 
sSEE IF ANY FAILURES 
TST PARCNT 
BEQ 2* 
FATAL 3 

FATAL* 
♦ 3 
CRF 

NEMCNT 
3* 

#2. ADDRESS 
4 

FATAL* 

44 

CRF 

CPUBIT, CONFIG 



INC 
ERROR 
.DSABL 
TST 
BEQ 
SUB 
FATAL 
INC 
ERROR 
.DSABL 
BIS 
RES4 
MOV 
CMP 
BNE 
CLR 



#TIME0UT.4 
»5.PR0TYP 
101$ 
CPUERR 



jTURN CACHE OFF 

;SEE IF I CAN DO A READ ACCESS WITHOUT A PARITY TRAP 

sTURN CACHE ON 

;ANY PARITY ERRORS? 
;N0 - SKIP 

;SET FATAL INDICATOR 



ANY NON EXIST ANT MEMORY (HOLES)? 
SKIP IF EQUAL 

UPDATE 1ST ADDRESS FAILURE FROM AUTO INCREMENT « 
:SET FATAL INDICATOR 



iSET CORRECT ACCESSED BIT ON BANK 0 
! RESET TRAPS TO 4 TO DEFAULT 



. DSABL CRF 



;IS THIS AN 11/83/84 ? 
i BRANCH IF NOT 

s CLEAR OUT THE CPU ERROR REGISTER BITS 
jTHAT A EXPECTED TRAP COULD HAVE SET 



SUBTST <<ENABLE ECC FOR CORRECT TRAPS>> 
■ t****************************************************************************** 

} •SUBTEST ENABLE ECC FOR CORRECT TRAPS 

• t*************************************************************************"**** 

IF #SWO SET. IN 3SWR OR ACTFLAG IS TRUE 

BIT «SU0.9SWR 
BNE L52 



CVMJAAO MSVll-J MEMORY DIAG. 
ENABLE ECC FOR CORRECT TRAPS 



010630 
010634 
010636 

5985 010636 

5986 010640 
010640 
010642 

5987 010642 

5988 010644 
010644 



005737 
001402 

104506 

000401 

104472 



002350 



112 
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ENASBE 
ELSE 



ECCINIT 
END :0F IF «SUO 



TST ACTFLAG 
BEQ LS3 

L52 

;TRAP ON SINGLE BIT ERRORS 

BR L54 

;TRAP ON DOUBLE BIT 'ERRORS (NORMAL) 
L54:jiis;i 



SEQ 0151 



CVnjAAO nSVll-J MEnORY OIAG. 
ENABLE ECC FOR CORRECT TRAPS 

5991 010644 
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156 



5992 
5993 
5994 
5995 
5996 
5997 
5998 
5999 
6000 
6001 
6002 



010644 000004 



6003 
6004 
6005 
6006 
6007 
6008 
6009 
6010 
6011 
6012 
6013 
6014 
6015 



6016 
6017 
6018 
6019 
6020 
6021 
60i>2 
6023 
6024 
6025 



6026 
6027 
6028 
6029 
6030 
6031 
6032 



010646 
010652 
010660 
010666 
010666 

010674 
010702 
010710 
010714 
010722 
010724 
010730 
010732 
010734 
010740 
010744 
010750 
010754 
010754 
010756 
010762 

010766 
010770 
010774 
010776 
011004 
011010 
011012 
011016 
011020 
011022 
011024 
011024 

011032 
011036 
011040 
011042 
011044 
011046 
011052 
011052 
011060 



005037 002102 
012737 000001 
012737 000002 



012737 
012737 
005237 
023737 
103451 
013701 
006301 
006301 
010137 
005037 
005037 
005037 

010346 
013703 
004737 

012603 
105761 
100542 
012777 
012700 
010004 
012701 
010103 
005002 
104424 

053737 

004737 
104417 
104423 
000240 
000416 
005037 



011420 
011422 
002102 
002556 

002102 



002104 
002074 
002072 
002070 



002102 
035716 



002664 

000207 
060000 

040000 



002552 
011414 

002102 



SEQ 0152 



NEUTST <<TEST BANKS 1 200 (OCTAL) FOR ZEROS £ 0NES>> 
s*TEST 3 TEST BANKS 1 200 (OCTAL) FOR ZEROS £ ONES 

; ******************************************************************** ****** 



TST3: 



002076 
002100 



012737 034050 000004 



002522 
002524 

002102 



TAG9$i 



171516 UARNl: 



177776 



2$: 



TAG2$: 



SCOPE 

EACH BANK IS TESTED FOR EXISTANCE AND IF IT EXISTS 
THEN IT IS TESTED FOR ZEROS 6 ONES. 
EXCEPT - 

PROTECTED BANKS (WHERE THE PROGRAM IS) ARE ONLY TESTED BY 
"TST" INSTRUCTIONS LIKE BANK #0 
ANY BAD BANKS ARE LOGGED IN THE CONFIGURATION 
THIS ROUTINE IS ONLY DOING A SMART SIZE NOT 
BANK 



012737 034114 
022737 000005 



000004 
004010 



CLR 
MOV 
MOV 
SET4 
MOV 
.DSABL 
MOV 
MOV 
INC 
CMP 
BLO 
MOV 
ASL 
ASL 
MOV 
CLR 
CLR 
CLR 
MAP 

MOV 
CALL 
.DSABL 

TSTB 
BMI 
MOV 
MOV 
MOV 
MOV 
MOV 
CLR 
CACHOFF 
TESTAREA 
BIS 
.DSABL 
CALL 
KERNEL 
CACHON 
NOP 
BR 
CLR 
RES4 
MOV 
CMP 



TABLE. 

ACTUAL TESTING! 



Ol.NOPAR 
#2.N0NEM 
ONONEXIST 
#N0NEXIST,4 
CRF 

0MTST3+4.LINK1 
#MTST3+6.LINK2 
BANK 

LASTBANK.BANK 
TAG2$ 
BANK.Rl 
Rl 
Rl 

Rl.BANKINDEX 
PATERR 
PARCNT 
NEMCNT 
BANK 

BANK,R3 
MAPPER 
CRF 

CONFIG(Rl) 
TSTBANK 
*207.aLINKl 
OFIRST.RO 
R0.R4 
#SIZE,R1 
R1,R3 
R2 



TESTMODE.PSW 
CRF 
MTST3 



TAG3$ 
BANK 

#TIME0UT,4 
#5.PR0TYP 



SET NO PARITY ERROR FLAG 

SET NON-EXISTANT MEMORY MODE TO EXIT TEST LOOP 
TRAPS TO 4 GOTO NONEXIST 



;SET UP LINKS 



;DONE? 
iYES - 



SKIP TO NEXT TEST 



iBANK * 4 

CLEAR PATTERN ERROR COUNTER 
CLEAR PARITY ERROR COUNTER 
CLEAR NON-EXISTANT MEMORY COUNTER (HOLES) 
MAP SUPERVISOR SPACE (TEST AREA) TO BANK 

MOV R3. (SP) 



MOV (SP)*.R3 

IS THIS BANK PROTECTED? 
YES - GO TEST BANK SPECIAL 

PUT "RETURN" INSTRUCTION AFTER URITE ROUTINE 



DATA IS ZEROS 

TURN CACHE OFF 

ENTER SUPERVISOR MODE 

:G0 TO SYSTEM TEST MODE 



; ENTER KERNEL MODE 
;TURN CACHE ON 

;SKIP NEXT INSTRUCTION 

; RESET TRAPS TO 4 TO DEFAULT 



;IS THIS AN 11/83/84 ? 



CVnjAAO nSVll-J nEnORV OIAG. macro VOS.Olb Friday 15 Feb-85 16 
T3 TEST BANKS 1-200 (OCTAL) FOR ZEROS £ ONES 
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SEQ 0153 



011066 


001002 








BNE 


101$ : 


011070 


005037 


177766 






CLR 


CPUERR : 


011074 








101$: 
















. OSABL 


s 

CRF 


6033 011074 


005037 


002076 






CLR 


NOPAR 


6034 011100 


000557 








BR 


SUBAAI 


6035 011102 


005737 


002070 




TAG3$: 


TST 


NEMCNT 


6036 011106 


001401 








6EQ 


1$ 


6037 011110 


000677 








BR 


TAG9$ 


6038 011112 


104424 






a A 

If : 


CACHOFF 




6039 011114 










TESTAREA 


011114 


053737 


A A '^P P '\ 

002552 


a ^TTT^ 

iffl/b 




O T f* 

BIS 


TtSTMODE ,PSW 












.OSABL 


CRF 


6040 011122 


004777 


a ^ a 9 

171376 






CALL 


SLINK2 


6041 011126 


104417 








KERNEL 




6042 011130 


104423 








CACHON 




6043 011132 


AAA il A 

000240 








NOP 




6044 011134 


A AP^ V ^ 

005737 


A A '\ A^ il 

002074 






TST 


PATERR 


6045 011140 


A A a A V 

001032 








BNE 


2* 


6046 011142 


AAP^ V ^ 

005737 


002072 






TST 


PARCNT 


6047 011146 


AA a A A^ 

001027 








BNE 


2$ 


^ fKM A /\aaap/\ 

6048 011150 


AAC^ 

005737 


AA A 

002070 






TST 


NEMCNT 


6049 011154 


A A a A il 

001024 








BNE 


2$ 


^ Aa a aPf 

6050 011156 


A a A A 

012700 


A£ A AAA 

060000 






MOV 


*FIRST,RO 


^ A V a M a a a ^ 

6051 011162 


A a AAA ii 

010004 








MOV 


R0,R4 


6052 011164 


A a A^ A a 

012701 


A ii AA AA 

040000 






MOV 


*SIZE.R1 


^ AM a a a 

6053 011170 


010103 








MOV 


R1.R3 


^ A Ma a a^t 

6054 011172 


013702 


AAA£ a il 

002614 






MOV 


0NES.R2 


6055 011176 


012777 


AAA Ail A 

000240 


171316 




MOV 


#000240, SLINKl 


6056 CI 1204 


a Aji jt '^A 








CACHOFF 




6057 011206 










TESTAREA 


011206 


ACV ^9 ^ 

053737 


002552 


Iffffb 




BIS 


TESTMOOE.PSU 










.OSABL 


CRF 


^ A p M M a a a A 

6058 011214 


004737 


A 1 1 il 1 il 

011414 






CALL 


MTST3 


6059 011220 


a Ail A * ^ 

104417 








KERNEL 




6060 011222 


a A ii ii AY 

104423 








CACHON 




^ a Aa a ^^A 

6061 011224 


AAA Ail A 

000240 








NOP 


bankindex.ro 


6062 011226 


A a V ^ AA 

013700 


AA'> a Ail 

002104 




2$ : 


MOV 


6063 011232 


AAf ^ 

005737 


AA A A^ il 

002074 






TST 


PATERR 


6064 011236 


AA a AA£ 

001006 








BNE 


3$ 


6065 011240 


005737 


AA A Al A 

002072 






TST 


PARCNT 


6066 011244 


AA a AAV 

001003 








BNE 


3$ 


bObf vlle4D 




KJKJCV IKJ 






TST 


NEMCNT 


6068 011252 


001406 








BEQ 


4$ 


6069 011254 


052760 


000001 


002664 


3$- 


BIS 


#BIT0.C0NFIG(R0) 


6070 011262 










SET 


CONFGERROR 


011262 


012737 


177777 


002450 








6071 011270 


053760 


002106 


002664 


4$: 


BIS 


CPUBIT.CONFIG(RO) 


6072 011276 


000137 


010710 






JMP 


TAG9$ 



6073 
60'»4 
6075 

6076 
6077 
6078 



011302 
011302 
011304 
011312 
011316 



010146 
012737 
012700 
012701 



;TEST A PROTECTED BANK 
TSTBANK.-PUSH Rl 



000001 002100 

060000 

020000 



MOV 
MOV 
MOV 



#1.N0NEM 
#FIRST.RO 
#20000, Rl 



s INDICATE DEFAULT PARITY ACTION 

ANY TRAPS? 
NO - SKIP 

NOW - TRY NEXT BANK 

TURN CACHE OFF 

ENTER SUPERVISOR MODE 

;G0 TO SYSTEM TEST MODE 

FINISH PATTERN 
ENTER KERNEL MODE 
TURN CACHE ON 
DEBUG AID 

ANY PATTERN ERRORS 
YES - SKIP 
ANY PARITY ERRORS 
YES - SKIP 

ANY NON EXISTANT MEMORY 
YES - SKIP 



DATA IS ONES 

PUT "NOP" INSTRUCTION BACK IN SUBROUTINE 
TURN CACHE OFF 
ENTER TEST MODE 

:G0 TO SYSTEM TEST MODE 

DO IN MEMORY IF NOT 
ENTER KERNEL MODE 
TURN CACHE ON 
DEBUG AID 

ANY PATTERN ERRORS? 

YES SKIP 

ANY PARITY ERRORS? 

YES - SKIP 

ANY HOLES? 

NONE - SKIP 

SET ERROR BIT IN THIS BANK 

FORCE PRINTING OF CONFIGURATION TABLE 

MOV # 1. CONFGERROR 

;SET ACCESSED BIT 



MOV Rl.-(SP) 
;SET NON-EXISTANT MEMORY TO COUNT 
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6079 011322 


104424 








CACHOFF 




6080 011324 










TESTAREA 


011324 


053737 


002552 


177776 




BIS 
.DSABL 


TESTMODE.PSW 
CRF 


6081 011332 


005720 






4J: 


TST 


(RO)* 


6082 011334 


077102 








SOB 


R1.4< 


6083 011336 


104417 








KERNEL 


6084 011340 


104423 








CACHON 




6085 011342 


012737 


000002 


002100 




MOV 


«2,N0NEM 


6086 011350 










POP 


Rl 


011350 


012601 












6087 011352 










IF PARCNT NE #0 


011352 


005737 


002072 










011356 


001406 












6088 011360 


052761 


000001 


002664 




BIS 


OBITO.CONFIGCRl) 


6089 011366 










SET 


CONFGERROR 


011366 


012737 


177777 


002450 








6090 011374 










END ;0F 


IF PARCNT 


011374 














6091 011374 










IF NEMCNT EQ #0 


011374 


005737 


002070 










011400 


001003 












6092 011402 


053761 


002106 


002664 




BIS 


CPUBIT,C0NFIG(R1) 


6093 011410 










END ;0F 


IF NEMCNT 


011410 














6094 011410 


000137 


010710 






JMP 


TAG9$ 


6095 011414 


010220 






MTST3: 


MOV 


R2.(R0)* 


6096 011416 


077102 








SOB 


R1.MTST3 


6097 011420 


000240 








NOP 




6098 011422 


012401 






2$: 


MOV 


(R4)*,R1 


6099 011424 


020102 








CMP 


R1,R2 


6100 011426 


001402 








BEQ 


3$ 


6101 011430 


005237 


002074 






INC 


PATERR 


6102 011434 


077306 






3<: 


SOB 


R3.2$ 


6103 011436 


000207 








RETURN 





SEQ 0154 



:TURN CACHE OFF 
; ENTER TEST MODE 

jGO TO SYSTEM TEST MODE 



; ENTER KERNEL MODE 
;TURN CACHE ON 

i RESET N0N-EXIS1ANT MEMORY TO EXIT TEST LOOP 

MOV {SP)«.R1 

TST PARCNT 
BEQ L55 

i ERROR BANK 

MOV 0-1. CONFGERROR 

L55: : 

TST NEMCNT 
BNE L56 

; ACCESSED BANK 

L56: 

; WRITE MEMORY TO PATTERN 
sDO TILL DONE 

;THIS IS EITHER A NOP OR RETURN 
iREAD DATA 
;DOES IT MATCH ? 

ilF NOT COUNT ERRORS 
;ANY WAY DO ALL MEMORY 
;DONE RETURN 
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M12 
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SEQ 0155 



6105 011440 



6106 
6107 
6108 



SUBAAI: SUBTST <<FINO SHAOOU INHIBIT MODE POINTERS >> 
******************************************************************************* 

♦SUBTEST FIND SHAOOU INHIBIT MODE POINTERS 

*******************************************************************^^^^^tttttt* 

♦ THIS SECTION LOOKS FOR INTERLEAVED MSVll-J MEMORIES AND FIGURES OUT 

♦ UHERE THE SHADOU INHIBIT MODE POINTERS ARE LOCATED. THESE AREAS 

♦ ARE THEN MARKED AS PROGRAM SPACE. 



6109 011440 


005037 


002102 




clr 


BANK 


: RESET BANK TO ZERO 


6110 011444 


004737 


040052 




SHADLl: CALL 


EXBANK 


:SET BANK PARAMETERS 


6111 011450 


013700 


002104 




MOV 


bankindex.ro 




6112 011454 








IF ACFLAG IS TRUE AND INTFLAG 


IS TRUE 


011454 


005737 


002116 








TST ACFLAG 


011460 


001414 










BEQ L57 


011462 


005737 


002136 








TS1 INTFLAG 


011466 


001411 










BEQ LS7 


6113 011470 


062702 


000040 




ADO 


«40,R2 


: POINT TO BANKINDEX * 8 


6114 011474 


062737 


000020 


002102 


ADD 


«20,BANK 


i POINT TO BANK * 16 


6115 011502 


052760 


000200 


002664 


BIS 


#BIT7,CONFIG(RO) 


iMAKE NEU BANK PROGRAM SPACE 


6116 011510 








ELSE 






011510 


000402 










BR L60 


011512 














6117 011512 


005237 


002102 




INC 


BANK 


:G0 TO NEXT BANK 


6118 011516 








END; OF 


IF ACFLAG 


011516 












:HAVE UE DONE ALL THE BANKS? 


6119 011516 


023737 


002556 


002102 


CMP 


LASTBANK.BANK 


6120 011524 


002347 






BGE 


SHADLl 


i BRANCH IF NOT 
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SEQ 0156 



C123 011526 



6124 
6125 
6126 
6127 
6128 
6129 
6130 
6131 
6132 
6133 
6134 
6135 
6136 
6137 
6138 
6139 
6140 
6141 
6142 
6143 



6144 
6145 
6146 
6147 



6148 



6149 



6150 
6151 
6152 
6153 
6154 
6155 



6156 
6157 



6158 
6159 

6160 
6161 



011526 000004 



NEUTST <<ECC INHIBIT MODE POINTER TEST>> 
;*TEST 4 ECC IWIBIT MODE POINTER TEST 

TST4: SCOPE 



011530 
011532 
011540 
011540 
011544 
011544 
011550 
011554 
011560 
011560 
011564 
011566 
011566 
011572 
011574 
011574 
011600 
011602 
011606 
011612 
011614 
011620 
011624 
011624 
011632 
011634 
011642 
011642 
011646 
011650 
011656 
011656 
011656 
011662 
011662 



104424 

012737 177777 002156 
005037 002102 



012701 
004737 
013700 

005737 
001436 

005737 
001433 

005737 
001030 
012703 
116002 
006302 
042702 
010237 

023737 
001413 
013737 

005737 
001003 
052760 



060000 
040052 
002104 

002116 



002120 

002342 

000002 
002665 

177741 
002152 

002152 002156 
002152 002156 
002122 

000100 002664 



THE MSVll-J OR MFllS-K INHIBIT ECC 
ON THE BOTTOM FIRST OR SECOND 16K 
IS CONSIDERED TO BE A PROTECTED 
QUITE COMPLEX TO DETERMINE ON A 
BANKS CAN BE PROTECTED: 
SO 

THIS ROUTINE ATTEMPS TO CREATE A 
OF EVERY ECC BANK. ECC HARDUARE 
IN PROTECTED BANKS UHICH SHOULD 
THE PROGRAM IS. 



DISABLE AND DIAGNOSTIC CHECK MODE 
WORDS CONTROLLED BY A CSR. THIS 
BANK BY THE PROGRAM. IT MAY BE 
GIVEN SYSTEM CONFIGURATION UHICH 



DOUBLE BIT ERROR IN ADDRESS 0 C 2 
WILL PREVENT THIS FROM HAPPENING 
ALUAYS INCLUDE BANK ZERO - WHERE 



WARNING •)•)••• I * • • 

IN CASE 'of 'hardware FAILURE IT IS COMMON THAT A DOUBLE BIT ERROR 
WILL BE CREATED ON THE KERNEL STACK L "CRASH" THE DIAGNOSTIC 

DURING THIS ROUTINE. YOUR ONLY CLUE IS THAT YOU CAN GET AS FAR AS 

THIS ROUTINE BUT NOT PAST IT! 



004737 011750 



CACHOFF 
MOV 0-l.OLDCSR 
FOR BANK «0 TO LASTBANK 



MOV #FIRST.R1 
CALL EXBANK 
MOV BANKINDEX.RO 
IF ACFLAG IS TRUE 



IF MKFLAG IS TRUE 
IF SKIPMK IS FALSE 



MOV #2.R3 

MOVB CONFIG* 1(R0).R2 

ASL R2 

BIC #tC36.R2 

MOV R2,CSRN0 

IF CSRNO NE OLDCSR 



MOV CSRNO, OLDCSR 
IF PFLAG IS FALSE 



BIS «BIT6.C0NFIG(R0) 
END; OF IF PFLAG 

CALL IMPTEST 
END; OF IF CSRNO 



;TURN CACHE OFF 



CLR BANK 

, 

;SET UP VIRT'aDDR POINTER 



TST ACFLAG 
BEQ L61 

TST MKFLAG 
BEQ L62 

TST SKIPMK 
BNE L63 
;SET INDEX COUNTER 



CMP CSRNO. OLDCSR 
BEQ L64 



TST PFLAG 
BNE L65 



L65: 



L64: 



• • • f # f 



CVHJAAO 
T4 

6162 
6163 
6164 
6165 
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SE8 0157 



6166 



6167 
6168 



6169 
6170 



6171 
6172 

6173 
6174 



011662 
011662 
011662 
011662 
011662 
011662 
011662 
011662 
011666 
011674 
011676 
011676 
011676 
011700 
011704 

011710 
011712 
011716 
011716 
011724 
011726 
011732 
011734 
011734 
011736 
011736 
011740 
011740 
011742 
011742 
011742 
011744 



005237 
023737 
003723 



010346 
012703 
004737 

012603 
005037 

032777 
001003 
005737 
001402 

104506 

000401 

104472 



104423 
000137 



002102 
002102 



000200 
035716 



002102 
000001 
002350 



002556 



170712 



EW: OF IF SKIPHK 
EH) s OF IF MKFLAG 
END: OF IF ACFLAG 
END: OF FOR BANK 



L63 
L62 
L61 



: : : i i : 

S t 5 { ■ • 

: i s s t ; 



012172 



INC BANK 
ChP BANK.LASTBANK 
BLE B6 

E6:siii::t 

MAP iMAP TEST SPACE TO BANK 0 

MOV R3.-(SP) 

MOV #200. R3 
CALL MAPPER 
.DSABL CRF 

MOV (SP)*.R3 

CLR BANK 

IF «SUO SET. IN SSUR OR ACTFLAG IS TRUE 

BIT «suo.asuR 

BNE L66 
TST ACTFLAG 
BEQ L67 

ENASBE :TRAP ON SINGLE BIT ERRORS 

ELSE 

BR L70 

ECCINIT :TRAP ON DOUBLE BIT "ERRORS (NORMAL) 

END; OF IF #SUO 

L70: 

CACHON {TURN THE CACHE BACK ON 

JMP SUBAAR :JUMP OVER THE SUBROUTINE 
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ol'O 011750 


AACAA^ 

005004 






6177 011752 








All 

01173;? 


A4 f\^AC 

010346 






011754 


At T7A1 

013703 


AA^t A^ 

002102 




011760 


004737 


035716 




All t^A 

Oil rO# 


Olcoos 






6170 0117OO 


AACAAC 

005005 






61 '7 Oil r IV 


OlcrSr 


A3AAAA 


AA01 CA 

0O215O 


6100 Oil ' to 








A1 1 77<« 






1 7777fc 
Xi 1 1 iX> 












AI 1 1 






OXOC ViCS/S/O 


AAATAI 






OlOd MXcMXM 








A 4 3A4 A 


A 1 1 1 AH 
VXXX^O 








104 SOS 






6185 012014 


010411 






6186 012016 


160301 






6187 012020 


010411 






6188 012022 


104503 






6189 012024 


005711 






6190 012026 


104501 







6191 
6^92 
6193 

6194 012030 
012030 103435 

6195 012032 012737 020000 002150 

6196 012040 104505 

6197 012042 013711 002614 

6198 012046 104503 

6199 012050 005711 

6200 012052 104501 

6201 012054 
012054 103423 

6202 012056 104513 

6203 012060 012737 023140 002150 

6204 012066 104505 

6205 012070 010411 

6206 012072 104503 

6207 012074 005711 

6208 012076 104501 

6209 012100 
012100 103411 

6210 012102 104513 

6211 012104 012737 023604 002150 

6212 012112 104505 

6213 012114 010411 

6214 012116 104503 

6215 012120 005711 

6216 012122 104501 

6217 012124 
012124 

6218 012124 
012124 



C13 

riday 15-Feb-8S 16:10 Page 160 



:CLR R4 
MAP BANK 

nOV BANK.R3 
CALL MAPPER 
.OSABL CRF 

CLR R5 
MOV «BIT13.CSR 
TESTAREA 



BIS 
.OSABL 
PUSH 

ADO 
PUSH 

CHKIOIS 
MOV 
SUB 
MOV 

CLRICSR 
TST 

UASIDBE 



TESTMODE.PSU 

CRF 

(Rl) 

R3,R1 
(Rl) 



R4.(R1) 

R3.R1 

R4.(R1) 

(Rl) 



SEQ 0159 



jMAP SUPERVISOR SPACE (TEST AREA) TO BANK 
MOV R3. (SP) 



MOV (SP)..R3 



! ENTER TEST MODE 

sGO TO SYSTEM TEST MODE 

;SAVE TEST LOCATION 

MOV (Rl).-(SP) 

; INDEX TO NEXT LOCATION 
sSAVE TEST LOCATION 

MOV {R1),-(SP) 
{DISABLE ECC 6 WRITE CHECKBITS FOR 1 CSR 
s WRITE CHECKBITS (ALL ZEROS) 



CLEAR CSR 

READ CHECKBITS INTO REAL CSR 
WAS THERE A DOUBLE BIT ERROR 



:THIS MAKES SURE THAT SBE'S DON'T LOOK LIKE PROTECTED AREAS 
ON.NOERROR :1 



MOV #BIT13.CSR 
CHKIDIS 

MOV ONES.(Rl) 
CLRICSR 
TST (Rl) 
WASIDBE 
ON.NOERROR :2 

CBREG 

MOV «23140.CSR 

CHKIDIS 

MOV R4.(R1) 

CLRICSR 

TST (Rl) 

WASIDBE 

ON.NOERROR i3 

CBREG 

MOV #23604. CSR 
CHKIOIS 

MOV R4.(R1) 
CLRICSR 
TST (Rl) 
WASIDBE 
END ;0F ON.NOERROR ;3 

END :0F ON.NOERROR :2 



BCS L71 

: DISABLE ECC 6 WRITE CHECKBITS FOR 1 CSR 
: CLEAR CSR 

iWAS THERE A DOUBLE BIT ERROR 
BCS L72 

ENABLE CHECK/SYNDROME BIT REGISTER 
WRITE DBE'S IN CSR 

DISABLE ECC £ WRITE CHECKBITS FOR 1 CSR 
: CLEAR CSR 

J WAS THERE A DOUBLE BIT ERROR 
BCS L73 

ENABLE CHECK/SYNDROME BIT REGISTER 
WRITE DBE'S IN CSR 

DISABLE ECC L WRITE CHECKBITS FOR 1 CSR 
: CLEAR CSR 

iWAS THERE A DOUBLE BIT ERROR 
L>'3:ii:::i 
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6219 012124 








END iOF 


ON.NOERROR :1 




012124 














6220 012124 








ON. ERROR 




012124 


103001 










BCC L74 


6221 012126 


005205 






INC 


R5 


; IDENTIFY AS BAD BANK 


6222 012130 








END iOF 


ON. ERROR 




012130 












L74: ; ; : : ; ; 

: DISABLE ERROR CORRECTION 


6223 012130 


104471 






ECCIDIS 




6224 012132 


010411 






MOV 


R4.(R1) 


; CLEAR OUT DOUBLE BIT ERROR! 


6225 012134 


060301 






ADO 


R3.R1 


; INDEX TO SECOND UORD 


6226 012136 


010411 






MOV 


R4,(R1) 


} CLEAR OUT DOUBLE BIT ERROR! 


6227 012140 


104503 






CLRICSR 






6228 012142 


005705 






TST 


R5 




6229 012144 


001405 






BEQ 


1$ 




6230 012146 


050560 


002664 




BIS 


R5,C0NFIG(R0) 




6231 012152 


105260 


002666 




INCB 


C0NFIG*2(R0) 




6232 012156 


104036 






ERROR 


♦ 36 




6233 012160 






It : 


'UK 


Knl) 


{RESTORE TEST LOCATION \.2ND UORD) 


012160 


012611 










MOV (SP)*.(R1J 


6234 012162 


160301 






SUB 


R3.R1 


sGO BACK TO FIRST UORD 


6233 0121O4 








POP 


(Rl) 


.DCCTnDc TccT 1 n/*ATTniu ^ 1 cT unon ^ 
(KtblUKt ltd! LULnllUN llol UUKUJ 


012164 


012611 










MOV (SP)«.(R1) 


6236 012166 


104417 






KERNEL 






6237 012170 


000207 






RETURN 






6238 














6239 012172 






SUBAAR: 


SET 


STOPOK 


: PROGRAM CAN NOU BE HALTCO 


012172 


012737 


177777 002420 








MOV *-l. STOPOK 
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6242 012200 SUBTST << LEGAL CONFIGURATION CHECK >> 

:*SUBTEST LEGAL CONFIGURATION CHECK 



; ******************************************** 



6243 012200 


012700 


A AA A 

000020 




MOV <M6..R0 






6244 012204 


A 4 ^^A 4 

012701 


002462 




MAI 1 JIA O T LIP A O 1 

nOv OCSRINFO.Rl 






1 6245 012210 


AACA^ « 

005021 




1$: 


CLR CRD* 






1 6246 012212 


ATTAA^ 

077002 






SOB R0,1$ 






6247 012214 








FOR BANK := #0 TO LASTBANK 






012214 


AACAT^ 

005037 


A A O 4 A *> 

002102 








CLR BANK 


A 1 ^ ^ '3 A 










D7 




6240 012220 


004737 


AJI AAC 

040052 




^Al 1 PX/OALII^ 

CALL EXBANK 






6249 012224 


A 1 V 7 AA 

013700 


AA*^! Ail 

002104 




MAII DAkll/TklAPV DA 

nOV oANKINDEX.RO 






6250 














6251 012250 








TC A^Cl Ar* TC TDI IP 

IF ACFLAG IS TRUE 






A « YA 

012250 


003 /if 


AA 0 1 1 C 

002116 








TST ACFLAG 


012254 


AA tAAA 
001444 










BEU L75 


6252 012236 


« 1 £AAY 

116003 


002665 




MAl/O PAMCTr* 1 ^ DA ^ 

nOVB LONrlb'tKKO J ,K3 






6253 012242 


Ail 9^AV 

042703 


1 r r reO 




OT^ A*l*17 Dtl 






6254 0122AO 


AAdAV 

006303 






HbL K3 






6255 012250 


AAC 9£ V 

005263 


AA^il£.^ 

002462 




TM/* ^CDTkICA^DT^ 






6256 012234 








TC MI/CI fl^ TC TDI IC 

ir riKrLnb lb IKUc 






012234 


003 ' 3 » 


AA01 9A 

OOfleO 








TCT MI/PI AP 

Ibl nKrLMb 


012260 


AA| 

0014de 










DCA 1 IC 

Dby L lb 


625 r 








• HAI/P CHOP TUAT PATU DAMI/ MAC kin HHOP 


TUAM 3 PCOC 




6e5o 0122ee 














01226e 










Dm ... . 




6259 0122De 








IF INTFLAG IS TRUE 






012262 


AA57T7 
003 r d > 


AA31 V£ 








TCT TklTCI AP 

Ibl INIrLAu 


012266 


AA 1 A 91 












6260 0122 '0 


1 1 

llouus 


UUeoo3 




MOVB C0NFIG«1(R0),R3 






6261 0122 '4 


A 1 A*AA 

010304 






MOV R3,R4 






6262 0122 '6 


AA97AT 
04e rU3 


Iff f Ov 




BIC #tC17.R3 






A1 9TA3 

6263 OleSOe 




1 7777A 




ASH »-4.R4 






6264 012306 


04e f V/4 


1 777fcrt 




BIC #tC17.R4 






6265 012312 








IF R3 EQ R4 






012312 


A^AVAil 

020304 










PMD DT DA 

Unr K3,K4 


012314 


AA 1 AA7 
00100 1 










Dklf 1 1 AA 

□Nc LlOO 


6266 012316 


042760 


A 1 A AAA 
014000 


OUcODD 


BIC #BIT11!BIT12.C0NFIG*2(R0) 




6267 012324 


Ail 9 7£ A 

042 f60 


4 7AAAA 

I rOOOO 


0UeDO4 


BIC «1 70000, CONFIG(RO) 






6260 012332 








LEAVE LEGALCSR 






012332 


A AAA AC 

000403 










DD CIA 

□K tlO 


6269 012334 








END: OF IF R3 






AI ^Wil 

012334 














6270 012334 








ELSE 






Ulcdd4 














012336 














6271 012336 








LEAVE LEGALCSR 






012336 


000403 










BR ElO 


6272 012340 








END J OF IF INTFLAG 






012340 














6273 012340 








SET CONFGERROR 




MOV 0-1. CONFGERROR 


012340 


012737 


177777 


002450 






6274 012346 








END LEGALCSR 






012346 














6275 012346 








END sOF IF MKFLAG 






012346 








L76: i i s i 


• • 

i • 



F13 

CVMJAAO MSVll-J MEMORY DIAG. MACRO VOS.Olb Friday 15-Feb 85 16:10 Page 162 
LEGAL CONFIGURATION CHECK 



6276 012346 










END 


J OF IF ACFLAG 


012346 














6277 012346 










END: 


OF FOR BANK 


012346 


005237 


002102 










012352 


023737 


002102 


002556 








012360 


003717 












012362 














6278 012362 










PUSH 


R5.R0 


012362 


010546 












012364 


010046 












6279 012366 


005000 








CLR 


RO 


6280 012370 


005001 








CLR 


Rl 


6281 012372 


005005 








CLR 


R5 


6282 012374 


005037 


012602 






CLR 


MBERR 


6283 012400 


022761 


000177 


002462 


2i: 


CMP 


#177.CSRINF0(P1) 


6284 012406 


002043 








BGE 


5$ 


6285 012410 


022761 


000010 


002462 




CMP 


#10.CSRINF0(R1) 


6286 012416 


002003 








BGE 


3* 


6287 012420 


004737 


012724 






CALL 


ILLCSR 


6288 012424 


000434 








BR 


5i 


6289 012426 


016005 


002664 




3$: 


MOV 


C0NFIG(R0).R5 
*BIT1.R5 


6290 012432 


032705 


000002 






BIT 


6291 012436 


001415 








BEQ 


4$ 


6292 012440 


042705 


170377 






BIC 


#tC7400.R5 


6293 012444 


072527 


177771 






ASH 


#-7,R5 


6294 012450 


020501 








CMP 


R5.R1 


6295 012452 


001007 








BNE 


4$ 


6296 012454 


032760 


010000 


002666 




BIT 


#BIT12.C0NFIG*2(P0) 


6297 012462 


001003 








BNE 


4$ 


6298 012464 


012737 


000001 


012602 




MOV 


#1, MBERR 


6299 012472 


062700 


000004 




4$: 


ADD 


*4.R0 


6300 012476 


022700 


000340 






CMP 


#340, RO 


6301 012502 


001351 








BNE 


3* 


6302 012504 


005737 


012602 






TST 


MBERR 


6303 012510 


001402 








BEQ 


5* 


6304 012512 


004737 


012724 






CALL 


ILLCSR 


6305 012516 


005000 






5$: 


CLR 


RO 


6306 012520 


005037 


012602 






CLR 


MBERR 


6307 012524 


062701 


000002 






ADD 


02. Rl 


6308 012530 


022701 


000040 






CMP 


#40, Rl 


6309 012534 


001321 








BNE 


2* 


6310 012536 










POP 


R0,R5 


012536 


012600 












012540 


012605 












6311 012542 


005037 


012602 






CLR 


MBERR 


6312 012546 


012700 


000774 






MOV 


#774. RO 


6313 012552 


032760 


000002 


002664 


6$: 


BIT 


#BIT1.C0NFIGCR0) 


6314 012560 


001003 








BNE 


7$ 


6315 012562 


162700 


000004 






SUB 


#4,R0 


6316 012566 


000771 








BR 


6$ 


6317 012570 


006200 






7$: 


ASR 


RO 


6318 012572 


006200 








ASR 


RO 


6319 012574 


010037 


002556 






MOV 


RO.LASTBANK 


6320 012600 


000402 








BR 


SKUJ 


6321 012602 


000000 






MBERR : 


.WORD 0 




6322 012604 


000000 






PHEBE : 


.WORD 0 




6323 012606 


005000 






SKUJ: 


CLR 


RO 



SEQ 0161 



L75: 



E7: 



INC BANK 

CMP BANK.LASTBANK 
BLE B7 



sSAVE CONTENTS OF R5. RO 

MOV R5.-(SP) 
MOV RO,-(SP) 

; CLEAR REGISTERS 



CLEAR ERROR INDICATOR 
IS CURRENT CSR <= 177 
BRANCH IF SO 
IS CURRENT CSR < 10 
BRANCH IF SO 
CALL ERROR ROUTINE 
TRY NEXT CSR 
MOVE LOU UORD TO R5 
DOES MEMORY EXIST HERE? 
BRANCH IF NOT 
ISOLATE CSR NUMBER IN 
REGISTER 5 

IS IT THE CURRENT CSR' 
TRY NEXT UORD OF CONFIG IF NOT 
IS IT INTERLEAVED? 
BRANCH IF SO 
SET ERROR INDICATOR 
UPDATE CONFIG COUNTER 
CONFIG TABLE ALL DONE? 
BRANCH IF NOT 
ERRORS FOUND? 
TRY NEXT CSR IF NOT 
CALL ERROR ROUTINE 
REINITIALIZE CONFIG COUNTER 
CLEAR ERROR INDICATOR 
UPDATE CSR COUNTER 
ALL CSR'S DONE? 
BRANCH IF NOT 
RESTORE REGISTERS 

MOV (SP)' 
MOV (SP)»,R5 
; RESET ERROR INDICATOR 
INDEX TO TOP OF CONFIG TABLE 
MEMORY PRESENT? 
BRANCH IF SO 

TRY NEXT LOUER ENTRY IN CONFIG TABLE 

R-C 



.RO 



R-C 
R-C 
R-C 



;R-C 



i DIVIDE INDEX BY 4 TO GET BANK # 
{STORE IN LASTBANK 



R C 
R-C 
R-C 



SAVE SPACE FOR ERROR INDICATOR 

SAVE SPACE FOR ODD BOUNDARY INTERLEAVED 

CLEAR CONFIG COUNTER 



.NDICATQR 
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LEGAL CONFIGURATION CHECK 





00^037 


C 12604 












000009 

VWvvc 


vVCVw*V 




RTT 




001431 








BEQ 




032760 


010000 


002666 

Wb vw 




BIT 




00100^ 








BNF 




005237 


012604 

VAC 






INC 


6330 012640 


062700 


000004 






ADD 


6331 012644 


000763 








BR 


6332 012646 


023727 


012604 


000010 

www iX w 


2$ • 


CMP 


6333 012654 


001417 








BEQ 


6334 012656 


023727 


012604 


000030 

WW V 




CMP 


6335 012664 


001413 








BEQ 


6336 012666 


023727 


012604 


000050 

^m^r ^r^m m^^m 




CMP 


6337 012674 


001407 








BEQ 


633S 012676 


023727 


012604 


000070 

w^rww ■ w 




CMP 


6339 012704 


001403 








BEQ 


6340 012706 


005037 


012604 




3$ : 


CLR 


6341 012712 


000403 








BR 


6342 012714 


012737 


000001 


012604 


4$ : 


MOV 


6343 012722 


000421 






5$: 


BR 


6344 012724 


010102 






ILLCSR: 


MOV 


6345 012726 


006202 








ASR 


6346 012730 


022702 


000012 






CMP 


6347 012734 


100002 








BPL 


6348 012736 


062702 


000007 






ADO 


6349 012742 


062702 


000060 






ADD 


6350 012746 


110237 


071210 






MOVB 


6351 012752 










TYPE 


012752 


104401 


071174 






TYPEIT 
.DSABL 


6352 012756 










SET 


012756 


012737 


177777 


002450 






6353 012764 


000207 








RETURN 
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SEQ 0162 



PHEBE 






ri FAR rniiNTPR 


#BJT1.C0NFIG(R0) 






T<i THFRF HFHnRY PRF<;FNT7 


3* 






BRANCH IF NUT 


#BIT12.C0NFIG*2(R0) 




IS IT intfrlfavfd? 


2i 






BRANCH IF SO 


PHFRF 

r nCDC 






INCREMENT COUNTER 








INCREMENT CONFIG COUNTFR 








TRY NEXT BANK 


PHFBF 010 






IS THE COUNTER EQUAL TO 


4$ 






ONE OF THE SPECIAL VALUES. 


PHFBF 030 






IF IT IS... 


4$ 






BRANCH TO 4$ 










4$ 








PHEBE j>70 








4$ 








PHEBE 




: CLEAR INDICATOR 


5$ 








«i PHEBE 




;SET INDICATOR 


SUBAAP 


: BRANCH 


TO NEXT SUBTEST 


R1.R2 


:R2 HAS 


CSR NUMBER 


R2 


:MAKE ACCEPTABLE FOR PRINTING 


#10.. R2 








1* 








#7.R2 








#60. R2 








R2,MSGA122 


iPUT NUMBER INTO ERROR MESSAGE 


MS6122 








.MSG122 








CRF 








CONFGERROR 









MOV #-1. CONFGERROR 



CVrijAAO MSVll-J MEMORY 01 AG. 
LEGAL CONFIGURATION CHECK 

6356 012766 



6357 012766 
012766 
012772 

6358 012776 

6359 013002 

6360 013004 

6361 013006 
013006 
013010 

6362 013010 
013010 
013016 

6363 013020 
013020 
013026 

6364 013030 
013030 

6365 013034 
013034 
013036 

6366 013036 
013036 

6367 013042 
013042 

6368 013042 
013042 

6369 013042 
013042 
013046 
013050 
013052 

6370 

6371 013052 

6372 013056 
013056 
013060 

6373 013060 

6374 013064 

6375 013070 

6376 013074 

6377 013100 

6378 013106 
013106 
013112 
013116 
013120 

6379 013120 
013120 
013122 

6380 013122 
013122 
013130 

6381 013132 



005037 
005037 
013702 
006302 
006302 

005001 



033761 
001411 

032761 
001403 

005237 

000402 



002400 
002402 
002556 



002106 
000400 
002402 



005237 002400 



062701 
020102 
003757 



000004 



005037 002452 



005001 

006361 
006361 
006361 
006361 
066137 

062701 
020127 
003760 



005001 



033761 
001402 



002374 
002374 
002374 
002374 
002374 

000002 
000010 
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SU8AAP: SUBTST <<PRINT CONFIGl^ATION DETAILS>> 

: ******************************************************************************* 

s*SUBTEST PRINT CONFIGURATION DETAILS 

; ********************* ********************************************************** 

CLEAR LSIZE.MSIZE 



SEQ 0163 



002664 
002666 



002452 



MOV LASTBANK.R2 

ASL R2 

ASL R2 

FOR Rl := #0 TO R2 BY #4 



IF CPUBIT SET, IN CONFIG(Rl) 
IF #BIT8 SET. IN C0NFIG*2(R1) 
LET MSIZE := MSIZE ♦ #1 

ELSE 

LET LSIZE := LSIZE ♦ # 
END: IF BIT8 
END! OF IF CPUBIT 
END iOF FOR ALL BANKS IN TABLE 



CLR 

FOR Rl 



#0 TO «10 BY 92 



BSIZE(Rl) 
BSIZE(Rl) 
BSIZE(Rl) 
BSIZE(Rl) 
BSIZECRD.I 



002106 002664 



ASL 
ASL 
ASL 
ASL 
AOO 
ENOs FOR Rl 

FOR Rl := »0 TO 0200 BY #4 
IF CPUBIT SET. IN CONFIG(Rl) 
LET UNITOP := UNITOP ♦ #1 



CLR LSIZE 
CLR MSIZE 



CLR Rl 

611::;:::: 

BIT CPUBIT, CONFIG(Rl) 
BEQ L102 

BIT «BIT8,C0NFIG*2CR1) 
BEQ L103 

INC MSIZE 

BR L104 

L103:i:;:;: 

INC LSIZE 

L104: ;;;;:: 

L102::::::: 

ADD 04.R1 
CMP R1.R2 
6LE Bll 
Ell: ::::::: 

CLR Rl 

B12: :::::: 



:BSIZE(R1) BSIZE(Rl) * 16. 
:I <- I « BSIZE(Rl) 

ADD «2.R1 
CMP Rl.#10 
BLE B12 
E12: :::;::: 

CLR Rl 
B13::::::: 

BIT CPUBIT. CONFIG(Rl) 
BEQ L105 



CVMJAAO MSVll-J MEMORY DIAG, 
PRINT CONFIGURATION DETAILS 
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SEQ 0164 



013132 


005237 


002416 












INC 


6382 013136 










END; 


OF IF CPUBIT 






013136 














L105; ; 




6383 013136 










END; OF 


FOR Rl 






013136 


062701 


000004 












ADD 


013142 


020127 


000200 












CMP 


013146 


003765 














BLE 


013150 














E13: ; ; 


6384 013150 


006337 


002416 






ASL 


UNI TOP 






6385 013154 


006337 


002416 






ASL 


UNI TOP 






6386 013160 


006337 


002416 






ASL 


UNI TOP 






6387 013164 


006337 


002416 






ASL 


UNI TOP 


; UNITOP := UNITOP * 16. 




6388 013170 










IF I LT 


UNITOP THEN LET 


I := UNITOP 




013170 


023737 


002452 


002416 










CMP 


013176 


002003 














BGE 


013200 


013737 


002416 


MM M d ^ M 

002452 










MOV 


013206 














L106: ; 


6389 013206 










TYPE 


$CRLF 






013206 


104401 


002660 






TYPEIT 
.DSABL 


, $CRLF 
CRF 






6390 013212 


005737 


MM d MM 

002400 




2$ : 


TST 


LSIZE 






6391 013216 


001414 








BEQ 








6392 013220 


022737 


MM il M MM 

004000 


003400 




CMP 


02048. , LSIZE 






6393 013226 


/\ A 4 AAV 

001003 








BNE 


12$ 






6394 013230 


162737 


000004 


002400 




SUB 


#4. LSIZE 


; SUBTRACT 4I< FOR THE I/O PAGE 




6395 013236 








12$ : 


TYPDEC 


LSIZE 






013236 


013746 


002400 






MOV 


LSIZE, -CSP) 


;;SAvE LSIZE FOR TYPEOUT 




013242 


104405 








TYPDS 
.DSABL 


CRF 


;;G0 TYPE—DECIMAL ASCII WITH 


SIGN 












1 TrC 


noullc 






013244 


104401 


071025 






TYPEIT 
.DSABL 


.MSG112 
CRF 






6397 013250 


005737 


002402 




3$: 


TST 


MSIZE 






6398 013254 


001414 








BEQ 


5« 






6399 013256 


022737 


004000 


002402 




CMP 


#2048., MSIZE 






6400 013264 


001003 








BNE 


13« 







CVMJAAO MSVll-J fCMORY OIAG. 
PRINT CONFIGURATION DETAILS 
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SEQ 0165 



6401 013266 

6402 013274 
013274 
013300 

6403 013302 
013302 

6404 013306 

6405 013314 

6406 013316 

6407 013324 
013324 
013330 

6408 013332 
013332 

6409 013336 
013336 
013344 

6410 013346 

6411 013352 
013352 



162737 000004 002402 

13*; 

013746 002402 
104405 



104401 071057 

022737 004000 002452 5i: 
001003 

162737 000004 002452 



013746 002452 
104405 



104401 070127 



032777 000100 167272 
001002 

004737 032722 



6^ 



SUB 

TYPOEC 

MOV 

TYPDS 

.OSABL 

TYPE 

TYPEIT 

.OSABL 

CMP 

BNE 

SUB 

TYPDEC 

MOV 

TYPDS 

.DSABL 

TYPE 

TYPEIT 

.DSABL 



04.MSIZE 
MSIZE 

MSIZE.-(SP) 



CRt- 

MSG113 

.MSG113 

CRF 

#2048. .1 
6$ 

#4.1 
I 

I.-(SP) i 



SUBTRACT 4K FOR THE I/O PAGE 

;SAVE MSIZE FOR TYPEOUT 

:G0 TYPE- -DECIMAL ASCII WITH SIGN 



SUBTRACT 4K FOR THE I/O PAGE 



CRF 

MSG070 
.MSG070 
CRF 



;SAVE I FOR TYPEOUT 

s:GO TYPE--DECIMAL ASCII WITH SIGN 



IF #SU6 OFF. IN SSUR 



CALL PCONFIG 
END: OF IF #SU6 



BIT ffSU6,SSUR 
BNE LI 07 



L107: 



K13 
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PRINT CONFIGURATION DETAILS SEQ 0166 

6414 013352 SUBTST <<CHECK APT SIZING>> 

:*SUBTEST CHECK APT SIZING 



; ******************** ****4r**4i********************** 



6415 013352 






IF APTFLAG IS TRUE AND APTSIZE 


IS TRUE 






013352 


005737 


002352 








TST APTFLAG 


013356 


001475 










BEQ LllO 


013360 


005737 


002444 








TST APTSIZE 


013364 


001472 










BEQ LllO 


6416 013366 


005037 


002434 


CLR TEMP 








6417 013372 


012700 


056676 


MOV #$MAMS1.R0 








6418 013376 






FOR R2 :» #0 TO 04 








013376 


005002 










CLR R2 


013400 










B14: 




6419 013400 






IFB KRO) NE «0 








013400 


105760 


000001 








TSTB KRO) 


013404 


001441 










BEQ Llll 


6420 013406 


111001 




MOVB (RO).Rl 








6421 013410 


042701 


177400 


BIC #177400. Rl 








6422 013414 






IF 2(R0) LT #0 








013414 


005760 


000002 








TST 2(R0) 


013420 


002002 










BGE LI 12 


6423 013422 


000261 




SEC 








6424 013424 






ELSE 








013424 


000401 










BR L113 


013426 










L112 




6425 013426 


000241 




CLC 








6426 013430 






END iOF IF 2(R0) 








013430 










L113 




6427 013430 


006101 




ROL Rl 








6426 013432 


005201 




INC Rl 


;T0 COMPENSATE 


FOR 4 


BANKS BEING (0-3) 


6429 013434 


006301 




ASL Rl 








6430 013436 


006301 




ASL Rl 








6431 013440 


006301 




ASL Rl 








6432 013442 


006301 




ASL Rl 








6433 013444 


163701 


002434 


SUB TEMP.Rl 








6434 013450 


010137 


002434 


MOV Rl.TEMP 








6435 013454 






IFB KRO) EO «3 








013454 


126027 


000001 000003 








CMPB KRO). #3 


013462 


001002 










BNE L114 


6436 013464 


060137 


002422 


ADD Rl.APTPAR 








6437 013470 






END jOF IFB KRO) 








013470 










L114 




6438 013470 






IFB KRO) EO »4 








013470 


126027 


000001 000004 








CMPB KRO). 04 


013476 


001002 










BNE L115 


6439 013500 


060137 


002424 


ADD Rl.APTECC 








6440 013504 






END {OF IFB KRO) 








013504 










L115: 




6441 013504 


062700 


000004 


ADD »4,R0 








6442 013510 






END sOF IFB KRO) 








013510 










Llll: 




6443 013510 






END 5 OF FOR R2 








013510 


005202 










INC R2 


013512 


020227 


000004 








CMP R2.#4 


013516 


003730 










BLE B14 


013520 















CVMJAAO nSVll-J MEHORY OIAG. 
CHECK APT SIZING 



6444 013520 
013520 
013526 
013530 
013536 
013540 
013546 
013550 

6445 013550 

6446 013552 
013552 

6447 013552 
013552 



023737 
001010 
023737 
001004 
023737 
001401 

104046 



002422 
002424 
002424 



L13 
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IF APTPAR NE LSIZE OR APTECC NE MSIZE OR APTECC NE PSIZE 
002400 CMP APTPAR, LSIZE 

AA^>.«^ BNE L116 

002402 CMP APTECC. MSIZE 

BNE L116 

002404 CMP APTECC. PSIZE 

BEQ L117 
1116:;:;.:: 

ERROR *46 
END ;QF IF APTPAR 

L117: :::::: 

END ;0F IF APTFLAG 

LllO:;:;:;: 



SEQ 0167 



CVMJAAO MSVll-J MEMORY DIAG, 
CHECK APT SIZING 



6449 


013552 








013552 






6450 013554 




wcccc 


6431 




01 f fvQ 


1 £7ACO 

10 7032 


6432 




04e f OU 


1 777*1 

III ibl 


6453 


013570 


W4 f f 0 


01 AoOO 


6454 


013574 


UUUl 0 t 


Ol JOcO 


6455 


013600 


Ul^cOc 




6456 


013602 






6457 


013604 






6458 


013606 


vl*»OcO 




6459 


013610 


014756 




6460 


013612 


015106 




6461 


013614 


015260 




6462 


013616 


015410 




6463 








6464 


013620 


004737 


014162 


6465 








6466 


013624 








013624 


000004 
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LOOP: NEWTST <<DIAGNOSTIC MODE DISPATCH ROUTINE>> 
;*TEST 5 DIAGNOSTIC MODE DISPATCH ROUTINE 

TST5: SCOPE 

CONTFLAG 



SEQ 0168 



CLR 
MOV 
BIC 
CALL 
JMP 

DISPTBL:BAFPAF 
BAFPAR 
BAUPAF 
BAUPAR 
PAFBAF 
PAFBAU 
PARBAF 
PARBAU 

MEMDONE:CALL 



SSUR.RO 
#tC16.R0 
SOISPTBLCRO) 
MEMDONE 



GET SUITCHES 
MASK TO ONLY MODE BITS 
DISPATCH TO ROUTINE THROUGH NEXT TABLE 
GO TO NEXT TEST 
MODE Oi BANKS FORWARD. PATTERNS FQRUARD 
MODE 1 .BANKS FORUARD. PATTERNS REVERSE 
MODE 2:BANKS WORST FIRST. PATTERNS FORWARD 
MODE 3 J BANKS WORST FIRST. PATTERNS REVERSE 
MODE 4 {PATTERNS FORWARD. BANKS FORWARD 
MODE 5; PATTERNS FORWARD. BANKS WORST KIRST 
MODE 6 {PATTERNS REVERSE. BANKS FORWARD 
MODE 7 J PATTERNS RFVERSE. BANKS WORST FIRST 



DOBACK 



; CHECK BACKGROUND PATTERN 



6467 
6468 



NEWTST << UNIQUE BANK TEST>> 
:*TEST 6 UNIQUE BANK TEST 

■ ******************************************************************************* 

TST6: SCOPE 

;MAKE SURE THAT EACH BANK CAN HAVE UNIQUE DATA 

: WRITE AND READ THE BANK NUMBER IN EACH BANK (EXCEPT WHERE THE PROGRAM IS) 



6469 


013626 








IF SELONLY IS FALSE 




013626 


005737 


002002 






TST SELONLY 




013632 


OOlOlS 








BNE LI 20 


6470 


013634 








SET 


HEADER, MUT 




013634 


012737 


177777 


002612 




MOV «-l, HEADER 




013642 


012737 


177777 


002110 




MOV tf-l.MUT 


6471 


013650 


004737 


021610 




CALL 


MT0027 


6472 


013654 








SET 


HEADER 




013654 


012737 


177777 


002612 




MOV «-l. HEADER 


6473 


013662 


005037 


002110 




CLR 


MUT 


6474 


013666 








END :0F 


IF SELONLY 




013666 










L120: :::::: 


6475 


013666 


004737 


014162 




CALL 


DOBACK {RESTORE BACKROUND PATTERN 


6479 














6480 


013672 








FLUSH: SUBTST 


<<FLUSH OUT DBE'S>> 












******************************************************************************** 












{♦SUBTEST 


FLUSH OUT DBE'S 












• *************************************i r ********************************** ****** 


6481 


013672 


004737 


022200 




CALL 


MT0030 



CVMJAAO MSVll-J MEMORY DIAG. 
END OF PASS ROUTINE 



6404 
6465 
6466 
6467 
6466 
6469 
6490 

6491 013676 

6492 013702 

6493 013706 

6494 013712 

6495 013716 

6496 013722 

6497 013724 

6498 013732 

6499 013736 

6500 013744 
013744 



005037 
012700 
042710 
062700 
020027 
003771 
013737 
005237 
042737 



002442 
002666 
020000 
000004 
003620 

002630 
056654 
100000 



104401 070251 



6501 013750 
013750 
013756 
013760 
013764 
013766 
013774 
013776 

6502 013776 
013776 

6503 014002 

6504 014006 
014006 

6505 014006 
014006 
014012 



6506 
6507 
6506 
6509 
6510 
6511 

6512 
6513 

6514 
6515 
6516 
6517 
6516 
6519 
6520 
6521 
6522 
6523 



014014 
014020 
014022 
014026 

014030 
014030 
014032 
014036 
014036 
014040 
014042 
014044 
014046 
014050 
014052 



032777 
001007 
005737 
001004 
023727 
001004 



104401 
005037 



013746 
104405 

013700 
001456 
022700 
001453 



010046 
004737 

012600 
000005 
004710 
000240 
000240 
000240 



004000 
002346 
056654 

067273 
002346 

056654 

000042 
002000 

040636 
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SEQ 0169 



.SBTTL END OF PASS ROUTINE 



•INCREMENT THE PASS NUMBER (JPASS) 



•INDICATE END -OF -PROGRAM AFTER 
♦TYPE "EHD PASS #XXXXX" (UHERE 
♦IF THERES A MONITOR GO TO IT 
•IF THERE ISN'T JUMP TO LOOP 
»EOP: 

II: 



EACH PASSES THRU THE PROGRAM 
XXXXX IS A DECIMAL NUMBER) 



002016 
056654 



166660 



000001 



CLR 


FSINFLAG 




MOV 


#C0NFIG^2.R0 


sMOVE 2N0 WORD OF CONFIG TO 


BIC 


#BIT13,(R0) 


: CLEAR BACKGROUND VALID BIT 


ADD 


«4,R0 


INCREMENT TO NEXT BANK 


CMP 


R0,«3620 


: DONE 7 


BLE 


1$ 


;N0 - BRANCH 


MOV 


lERTTL.LASTERROR 


INC 


$PASS 


; INCREMENT THE PASS NUMBER 


BIC 


«100000,$PASS 


i:D0N'T ALLOW A NEG. NUMBER 


TYPE 


MSG077 


ssTYPE "END PASS #" 


TYPEIT 


.MSG077 





RO 



.DSABL 
IF #SU11 



CRF 

SET, 



IN aSUR OR QVFLAG IS TRUE OR $PASS EQ 01 



L121: 



BIT 
BNE 
TST 
BNE 
CMP 
BNE 



«SU11.9SUR 

L121 

QVFLAG 

L121 

$PASS.#1 

L122 



$ZAP42: 



$ENOAD: 



IDOAGN: 



TYPE 


MSG035 


:QV 


TYPEIT 


.MSG035 


.DSABL 


CRF 




CLR 


QVFLAG 




END ;0F 


IF SUll 








L122: 


TYPDEC 


♦PASS 




MOV 


IPASS.-(SP) 


; ;SAVE IPASS FOR TYPEOUT 


TYPDS 




;:G0 TYPE--DECIMAL ASCII WITH 


.DSABL 


CRF 




MOV 


42. RO 


jjGET MONITOR ADDRESS 


BEQ 


IDOAGAIN 


s s BRANCH IF NO MONITOR 


CMP 


#STACK.RO 


{ARE UE UNDER RTll 


BEQ 


$DOAGAIN 


jYES - BRANCH 


;UE ARE 


UNDER (HEAVEN 


HELP US) XXDP! 


PUSH 


RO 




CALL 


SHUTUP 




POP 


RO 




RESET 




CLEAR THE WORLD 


CALL 


(RO) 


! ;G0 TO MONITOR 


NOP 




iiSAVE ROOM 


NOP 




: iFOR 


NOP 




s;ACTll 



MOV RO.-(SP) 



MOV (SP)..RO 



UNDO SHUTUP STUFF 

RESTORE STACK 

ENERGIZE Q-BUS MAP L 22 BIT ADDRESSING 
ENERGIZE MEMORY MANAGEMENT 
PUT LOADERS BACK HOME 



CVMJAAO MSVU-J MEMORY 01 AG. 
EHD OF PASS ROUTINE 



Bi4 
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SCO 0170 





A f T7A^ 

013706 


0025 »4 




MA.i VCTAP^ CD 




6525 014056 


005 ' 3 ' 


0024p4 




1 9 I NU22U1 1 


:l9 iPilb Ai^ il'SJ, 11/25 B OR 11/257 


6526 014062 


AAT 

OUl009 






Due 1 t 

ONt 1 * 




652' 0l#004 


0p2 ' 9 ' 




1 73d 
1 '2510 


Did m 1 j:di 1 4 , 1 ■ In 9 




652B 01*Q'2 


1 

i0**20 






1*: ci'KKul^c 


. Tl Akl my MFMThDV MAklArCMCkiT 
; 1 UKfl UN ntnUKT n^NHoCHtNl 


652t 01*U'* 


At X7AA 
01 9 rOO 


OOc3 'D 




nuv LUWniFit.KU 


■ Uc.9 1 INH 1 iUn dHNK 


osm; 0i*iw 


A1 i7A1 
Ulc 'Ul 






nuv Ki , Ki 


t 3UUKL.C. DnnR 


6591 0141U4 




U9 








<.<T3 Al At 1 A 
65)2 








TC BDTCl ft'" TC TOI f 




A1 Aim 


Ova f 9 ' 


AA3XO 






TCT ADTn Ar 


A1 A1 1 A 
01*1 1* 


UU1#SV 








BCD 1 1 3X 


/.Ct'I Al Al 141 
01411D 








Tr tllCUD rO tDACC 
Ir *U3HN CM frnss 




Ai A1 1 & 
0141 ID 


ft9T7X7 
Oc9 f 9 ' 


0300 'C 


03003* 




TMD IIICUD tDACC 


A 1 A 1 9A 
01*lc* 


nAI A1 A 








BMP 1 1 3A 

one L,lc4 


0394 Ul^lsO 


fti a7rti 

Ulc 'VI 






Mr 1 nnf^ : nuv vdVaKi 




v1^19c 


U ' ' vvl 






9 1 • COR DO 3 i 




0090 wl^lO^ 


UOC r 9 f 


VAA/vVl 




Ann Ai inrurT 




Jk<(X7 AlAtO 
Oj3f UlHl^c 


nn^<(X7 

Uvj39 ' 


U3000V 




Anr iiMTT 






077107 

V ' » Iv » 






DxJO n 1 • c ▼ 




6539 014150 


005237 


056654 




INC IPASS 




6540 014154 


000764 






BR APTHANG 




6541 014156 








END iOF IF $USUR 




014156 










L124: i : t s i : 


6542 014156 








END :0F IF APTFLAG 




014156 










L123::;iiii 


6543 014156 


000137 


013552 




$OOAGAIN: JMP LOOP 


! RETURN 



CVMJAAO MSVn-J MEHORY OIAG. 
E^O OF PASS ROUTINE 

6546 014162 



6547 
6548 



6549 
6550 



6551 

6552 
6553 
6554 

6555 

6556 



6557 



014162 
014166 
014166 
014172 
014172 
014176 
014176 
014202 
014204 
014210 
014212 
014212 
014220 
014226 
014232 
014236 
014236 
014244 
014244 
014244 
014244 
014250 
014256 
014260 
014260 



005037 


002112 




005037 


002102 




004737 


040052 




005737 
001420 

001015 


002116 




012737 
012737 
004737 
005037 


mm 
mm 

017104 
002110 


002612 
002110 


012737 


177777 


002612 


005237 
023737 
003745 


002102 
002102 


002556 



C14 
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OOeACK: SUBTST <<URITE BACKGROUND PATTERNS >> 

:*SUBTEST URITE BACKGROUND PATTERNS 

CLR PATTERN 
FOR BANK := »0 TO LASTBANK 



SEQ 0171 



CALL EXBANK 

IF ACFLAG IS TRUE AND RRFLAG IS FALSE 



B15: 



SET 



CALL 

CLR 

SET 



HEADER. HUT 



MKTEST 
HUT 

HEADER 



CLR BANK 



TST ACFLAG 
BEQ L125 
TST RRFLAG 
BNE L125 



MOV 0-1. HEADER 
MOV ff-l,MUT 
iCALL MJTEST UOULD ALSO WORK 



000207 



END ;0F IF ACFLAG 
END iOF FOR BANK 

RETURN 



L125: 



E15: 



MOV «-l. HEADER 



INC BANK 

CMP BANK. LASTBANK 
BLE B15 



D14 



CVMJAAO MSVll 
MTEST MODES 

6560 



•J MEMORY DIAG. 



6561 








6562 


014262 






6563 


014262 


005037 


002102 


6564 








6565 


014266 


004737 


040052 


6566 


014272 


005737 


002116 


6567 


014276 


001412 




6568 


014300 


005737 


002124 


6569 014304 


001007 




6570 


014306 


005037 


002112 


6571 








6572 


014312 


004737 


015562 


6573 








6574 


014316 


004737 


040474 


6575 014322 


001373 




6576 








6577 


014324 


005037 


002222 


6578 


014330 


004737 


040520 


6579 014334 


002354 




6580 








6581 


014336 


005737 


002126 


6582 


014342 


001401 




6583 


014344 


000207 




6584 


014346 


004737 


036402 


6585 


014352 








014352 


103001 






014354 


000207 






014356 






6586 








6587 


014356 


004737 


014262 


6588 


014362 


004737 


037214 


6589 


014366 


000207 
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.SBTTL MTEST MOOES 

BAFPAF: SUBTST <<BANKS FORWARD. PATTERNS FORUARD **RECURSIVE**> > 

: ******************************************************************************* 
:*SUBTEST BANKS FORUARO. PATTERNS FORUARD *«RECURSIVE«« 

i**************************************************************************^**** 



SEQ 0172 



1$; 



2$: 



4$: 



5$: 



CLR BANK 
: START OF BANK LOOP 
CALL EX6ANK 
TST ACFLAG 
BEQ 4$ 
TST RRFLAG 
6NE 4$ 
CLR PATTERN 
; START OF PATTERN LOOP 
CALL MTEST 



s TERMINATION OF PATTERN LOOP 



CALL INCPAT 
BNE 2i 

: TERMINATION OF BANK LOOP 



SET BANK TO 0 
EXAMINE BANK 

CAN UE ACCESS THIS BANK? 

NO - GO TO BANK LOOP TERMINATION 

RELOCATION REQUIRED? 

YES - GO TO BANK LOOP TERMINATION 

SET PATTERN TO 0 

GO TEST CORRECT MEMORY 



GO SEE IF THIS IS THE LAST PATTERN 
NO LOOP ON THIS PATTERN 



CLR 
CALL 
BGE 
:END 
TST 
BEQ 
RETURN 
CALL 



OF 



CONTFLAG 
INCBNK 
1* 

LOOPS 

RLFLAG 

5i 

RELOCATE 



ON. ERROR THEN $RETURN 



sNEXT HIGHER BANK 

:IF NOT DONE - LOOP ON THIS BANK 

:HAVE UE BEEN RELOCATED? 
:N0 SKIP 
:YES - RETURN 
:MOVE £ MAP PROGRAM 



;**NOTE** RECURSIVE CALL 
CALL BAFPAF -CALL SELF 

CALL UNRELOCATE jUNMOVE L UNMAP PROGRAM 

RETURN 



L126: 



BCC L126 
RTS PC 



CVMJAAO MSVll-J MEMORY DIAG. 
BANKS FORUARO, PATTERNS FORUARO 











D 373 






We Ave 


6594 








6595 


014374 


Vvt r o 1 




6596 


014400 




OOP1 1 A 


6597 


014404 






6598 


014406 


OOS737 


we AC** 


6599 


014412 


001007 




6600 014414 


004737 


040^10 


6601 

WW A 








6602 


014420 


004737 


01 


6603 








6604 


014424 


00S337 


OOPl IP 
weAxe 


6605 


014430 


100373 




6606 








6607 


014432 


005037 


vvccec 


6608 


014436 


004737 


040^P0 


6609 


014442 


00P354 




6610 








6611 


014444 


005737 


002126 


6612 


014450 


001401 




6613 


014452 


000207 




6614 


014454 


004737 


036402 


6615 


014460 








014460 


103001 






014462 


000207 






014464 






6616 








6617 


014464 


004737 


014370 


6618 


014470 


004737 


037214 


6619 014474 


000207 
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SEQ 0173 



BAFPAR: SUBTST <<BANKS FORWARD. PATTERNS REVERSE •♦RECURSIVE**) > 

;***♦♦♦♦♦*♦♦♦♦♦♦♦♦♦♦♦**♦♦♦♦♦♦♦♦♦♦♦♦♦*♦♦♦♦♦♦♦♦♦♦♦♦*♦*•******•****«**•««««***«««*« 

{♦SUBTEST BANKS FORUARO. PATTERNS REVERSE ♦♦RECURSIVE^^ 

; ♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦*♦♦♦♦♦♦♦**♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦******************«**«*«**««*«««** 



1$: 



2$: 



5$: 



CLR 
! START 
CALL 
TST 
BEQ 
TST 
BNE 
CALL 



LOOP 



jSET BANK TO 0 

{EXAMINE BANK 
:CAN UE ACCESS THIS BANK? 
:N0 GO TO BANK LOOP TERMINATION 
{RELOCATION REQUIRED? 
:YES - GO TO BANK LOOP TERMINATION 
:SET HIGH PATTERN FOR CORRECT MEMORY 



BANK 
OF BANK 
EXBANK 
ACFLAG 
4$ 

RRFLAG 
4$ 

SFTPAT 
! START OF PATTERN LOOP 
CALL MTEST jGO TEST CORRECT MEMORY 

{TERMINATION OF PATTERN LOOP 

DEC PATTERN {IS THIS THE LAST PATTERN? 

BPL 2$ {NO LOOP ON THIS PATTERN 

{TERMINATION OF BANK LOOP 
CLR CONFFLAG 
CALL INCBNK 
BGE U 
{END OF LOOPS 

{HAVE 
{NO - 
{YES 
{MOVE 



TST 
BEQ 

RETURN 
CALL 



RLFLAG 
5$ 

RELOCATE 



ON. ERROR THEN ^RETURN 



{NEXT HIGHER BANK 
{IF NOT DONE - LOOP ON THIS BANK 



UE BEEN RELOCATED? 
SKIP 
- RETURN 
€ MAP PROGRAM 



{♦♦NOTE^^ RECURSIVE CALL 
CALL BAFPAR jCALL SELF 

CALL UNRELOCATE {UNMOVE UNMAP PROGRAM 

RETURN 



L127:; 



BCC Ll^^T 
RTS PC 



CVMJAAO MSVU-J MEMORY DIAG. 
BAWS FORUARD. PATTERNS REVERSE 



ooZle 


01447O 






OOc^ 


lO 




wclwc 


OOC** 












UvH lot 


AAAA^3 


obeo 




vUj ( 3 ( 


AA31 1 A 


DOc ' 








OOcO 






AA31 TA 


OOC7 










Ul*> JSC 




AA91 9A 


OO 01 












vv3v0 ' 


AA91 1 0 


DDOO 








ODOH 




nnA7T7 


A1 ^^A9 
UX33DC 


OOOJ 








ODOD 




00A777 
yjyjH tot 


nA0A7A 






001 ^^7^ 

vvX O t O 
















OOSO'^? 

\J\Jj\JO 1 




OOHV 




00A7'^7 

tot 


0A0S90 




01 ASSA 


OOP^Sl 














vX^^WV 


00S137 


00P600 






001003 

WX W J 














ni ASAA 

VXH JQW 


00A7^7 


014476 


AAA? 


01 AS7? 


000P07 






01 AS7A 


00«;7^7 






01 AAOO 


OOlAOl 




6AS0 

WW 




000P07 




AAS1 

ww91 


A 1 A AHA 


004737 




AA^? 










014610 


103001 






014612 


000207 






014614 






6653 








6654 


014614 


004737 


014476 


6655 


014620 


004737 


037214 


6656 014624 


000207 
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SEO 0174 



BAUPAF: SUBTST <<BANKS UORST FIRST .PATTERNS FORUARD ••RECURSIVE** >> 

;*********•****************************•*******•*****••••••**•••••****•*•••*•••• 

:*SUBTEST BANKS UORST FIRST .PATTERNS FORUARO **RECURSIVE^^ 

;•*•**•*•********<^*******************•***••*•*•*••****•••••••••••••**•***••*•••« 



II: 



2i: 



4$: 



5$: 



6$: 



CLR BANK 
: START OF BANK LOOP 
CALL EXBANK 
TST ACFLAG 
BEQ 4$ 
TST BMFLAG 
BEQ 4$ 
TST RRFLAG 
BNE 41 
CLR PATTERN 
; START OF PATTERN LOOP 
CALL MTEST 
; TERMINATION OF 
CALL INCPAT 
BNE 2* 
; TERMINATION OF 
CLR 
CALL 
BGE 
.END 
COM 
BNE 



:SET BANK TO 0 
EXAMINE BANK 

CAN UE ACCESS THIS BANK? 

NO - GO TO BANK LOOP TERMINATION 

IS THIS BAD MEMORY (UORST FIRST)? 

NO - GO TO BANK LOOP TERMINATION 

RELOCATION REQUIRED? 

YES - GO TO BANK LOOP TERMINATION 

SET PATTERN TO 0 



THIS IS 
ON THIS 



THE LAST 
PATTERN 



:G0 TEST CORRECT MEMORY 
PATTERN LOOP 

;G0 SEE IF 
;N0 - LOOP 
BANK LOOP 

CONTFLAG 
INCBNK 
U 

LOOPS 

UORST :IS THIS AN EVEN NUMBERED PASS? 

5* jYES - SKIP 

i**N0TE** RECURSIVE CALL 
CALL BAUPAF ;CALL SELF 

RETURN 



PATTERN 



OF 



:NEXT HIGHER BANK 
;IF NOT DONE - LOOP 



ON THIS BANK 



TST RLFLAG 
BEQ 61 
RETURN 

CALL RELOCATE 

ON. ERROR THEN $RETURN 



;**NOTE** RECURSIVE CALL 



HAVE UE BEEN RELOCATED? 

NO - SKIP 

YES - RETURN 

MOVE £ MAP PROGRAM 



L130: 



BCC L130 
RTS PC 



CALL 
CALL 
RETURN 



BAUPAF ;CALL SELF 

UNRELOCATE iuNMOVE £ UNMAP PROGRAM 



CVMJAAO MSVn-J MEMORY OIAG. MACRO VOS.Olb Friday 15 Feb 85 16 
BANKS WORST FIRST .PATTERNS FORUARO **RECURSIVE** 



G14 

: 10 Page 



179 



SCO 0175 



6659 014626 



6660 


014626 






6661 








6662 


014632 


004737 


0400SP 


6663 014636 


00S737 


0091 16 


6664 014642 


00141^ 




6665 014644 


0057S7 


OOP 130 


vDOO 




00141? 




vDv ' 




005737 


00P1P4 


vDDO 




001007 






014660 

~wwv 


004737 


040^10 


6670 








WW 1 i 


014664 

~ww~ 


004737 


015562 


6672 








6673 


014670 


005337 


002112 


6674 


014674 


100373 




6675 








6676 


014676 


005037 


002222 


6677 


014702 


004737 


040520 


6676 


014706 


002351 




6679 








6660 


014710 


005137 


002600 


6661 


014714 


001003 




6662 








6663 


014716 


004737 


014626 


6664 


014722 


000207 

V W \r mm \r ' 




6665 


014724 


005737 


002126 


6666 


014730 


001401 




6687 


014732 


000207 




6666 


014734 


004737 


036402 


6689 014740 








014740 


103001 






014742 


000207 






014744 






6690 








6691 


014744 


004737 


014626 


6692 


014750 


004737 


037214 


6693 


014754 


000207 





BAUPAR: SUBTST <<BANKS UORST FIRST .PATTERNS REVERSE **RCCURSIVC**>> 
;*SUBTEST BANKS UORST FIRST. PATTERNS REVERSE **RECURSIVE** 

; ******************************************************************************* 



II: 



2$: 



4$: 



5$; 



6$: 



CLR BANK 

: START OF BANK LOOP 
CALL EXBANK 
TST ACFLAG 
BEQ 4$ 
TST BMFLAG 
BEQ 4$ 
TST RRFLAG 
BNE 4$ 
CALL SETPAT 

: START OF PATTERN LOOP 
CALL 



.SET BANK TO 0 
EXAMINE BANK 

CAN UE ACCESS THIS BANK? 

NO - GO TO BANK LOOP TERniNATION 

IS THIS BAD MEMORY (UORST FIRST) 

NO - GO TO BANK LOOP TERMINATION 

RELOCATION REQUIRED? 

YES - GO TO BANK LOOP TERMINATION 

SET HIGH PATTERN FOR CORRECT MEMORY 

:G0 TEST CORRECT MEMORY 



MTEST 

; TERMINATION OF PATTERN LOOP 

DEC PATTERN ;IS THIS THE LAST PATTERN? 

BPL 2* ;N0 - LOOP ON THIS PATTERN 

i TERMINATION OF BANK LOOP 
CLR CONTFLAG 
CALL INCBNK 
BGE II 
;END OF LOOPS 

COM UORST ilS THIS AN EVEN NUMBERED PASS? 

BNE 51 :YES - SKIP 



iNEXT HIGHER BANK 
ilF NOT DONE - LOOP 



ON THIS BANK 



;«*NOTE** RECURSIVE CALL 
BAUPAR 



CALL 
RETURN 

TST RLFLAG 
BEQ 6$ 
RETURN 

CALL RELOCATE 

ON. ERROR THEN I RETURN 



sCALL SELF 

HAVE UE BEEN RELOCATED? 

NC SKIP 

YES - RETURN 

MOVE £ MAP PROGRAM 



:**NOTE** RECURSIVE CALL 
CALL BAUPAR {CALL SELF 

CALL UNRELOCATE sUNMOVE £ UNMAP PROGRAM 

RETURN 



L131: 



BCC 
RTS 



L131 
PC 



hl4 



CVMJAAO MSVll-J MEMORY 0IA6, MACRO VOS.Olb Friday 15-Feb-85 16:10 Page 181 
BANKS WORST FIRST .PATTERNS REVERSE **RECURSIVE** 



SEQ 0176 



6696 014756 



6697 014756 


005037 


002112 


6696 






6699 014762 


005037 


002102 


6700 






6701 014766 


004737 


040052 


6702 014772 


004737 


040456 


6703 014776 


001010 




6704 015000 


005737 


002116 


6705 015004 


001405 




6706 015006 


005737 


002124 


6707 015012 


AAA A A 

001002 




6709 015014 


004737 


015562 


6709 






6710 015020 


005037 


002222 


6711 015024 


004737 


040520 


6712 015030 


002356 




6713 






6714 015032 


004737 


040474 


6715 015036 


001351 




6716 






6717 015040 


005137 


002134 


6718 






6719 015044 


001403 




6720 






6721 015046 


004737 


014756 


6722 015052 


000207 




6723 015054 


005737 


002126 


6724 0X3000 


00140X 




6725 015062 


000207 




6726 015064 


004737 


036402 


6727 015070 






015070 


103001 




015072 


000207 




015074 






6728 






6729 015074 


004737 


014756 


6730 015100 


004737 


037214 


6731 015104 


000207 





PAFBAF: SUBTST <<PATTERNS FQRUARO, BANKS FORUARD •*RECURSIVE**> > 

:*SUBTEST PATTERNS FORWARD. BANKS FORWARD **RECURSIVE** 



1$: 
2$: 



4$: 



5«: 



6^ 



CLR 
: START 
CLR 
s START 
CALL 
CALL 
BNE 
TST 
BEQ 
TST 
BNE 
CALL 



PATTERN 
OF PATTERN LOOP 
BANK 

LOOP 



OF BANK 
EXBANK 
BANKOK 
4« 

ACFLAG 
4$ 

RRFLAG 
4« 

MTEST 

: TERMINATION OF BANK 
CLR CONTFLAG 
CALL INCBNK 
BGE 2% 

: TERMINATION OF PATTERN 



LOOP 



:SET PATTERN TO 0 
:SET BANK TO 0 
EXAMINE BANK 

CORRECT MEMORY FOR THIS BANK? 
NO - GO TO BANK LOOP TERMINATOR 
CAN WE ACCESS THIS BANK? 
NO - GO TO BANK LOOP TERMINATION 
RELOCATION REQUIRED? 
YES - GO TO BANK LOOP TERMINATION 
GO TEST CORRECT MEMORY 



CALL 
BNE 
.-END 
COM 

BEQ 



OF 



INCRPT 
1* 

LOOPS 
TMFLAG 

5« 



;NEXT HIGHER BANK 
;IF NOT DONE - LOOP 
LOOP 

sNEXT HIGHER PATTERN 

;0K - LOOP; ELSE CONTINUE 



ON THIS BANK 



:**NOTE** RECURSIVE CALL 



CALL 
RETURN 
TST 
BEQ 

RETURN 
CALL 

ON. ERROR 



PAFLAF 

RLFLAG 
6$ 

RELOCATE 
THEN « RETURN 



COMPLEMENT 
IS THIS AN 
YES - SKIP 

J CALL Sti.F 



TYPE OF MEMORY 
EVEN NUMBER PASS? 



HAVE WE BEEN RELOCATED? 

NO - SKIP 

YES - RETURN 

MOVE L MAP PROGRAM 



;**NOTE** RECURSIVE CALL 



L132: 



BCC 
RTS 



L132 
PC 



CALL 
CALL 
RETURN 



PAFBAF ;CALL SELF 

UNRELOCATE :UNMOVE L UNMAP PROGRAM 



CVMJAAO MSVll-J MEMORY DIAG, 
PATTERNS FORWARD. BANKS FORWARD 



6734 


015106 






6735 


015106 


005037 


002112 


6736 








6737 


015112 


005037 


002102 


673a 








6739 015116 


004737 


040052 


6740 


015122 


004737 


040456 


6741 


015126 


001013 




6742 015130 


005737 


002116 


6743 


015134 


001410 




6744 


015136 


005737 


002130 


6745 


015142 


001405 




6746 


015144 


005737 


002124 


6747 


015150 


001002 




6748 


015152 


004737 


015562 


6749 








6750 015156 


005037 


002222 


6751 


015162 


004737 


040520 


6752 


015166 


002353 




6753 








6754 


015170 


004737 


040474 


6755 


015174 


001346 




6756 








6757 


015176 


005137 


002134 


6758 








6759 


015202 


001403 




6760 








6761 


015204 


004737 


015106 


6762 


015210 


000207 




6763 


015212 


005137 


002600 


6764 


015216 


001003 




6765 








6766 


015220 


004737 


015106 


6767 


015224 


000207 




6768 


015226 


005737 


002126 


6769 


015232 


001401 




6770 


015234 


000207 




6771 


015236 


004737 


036402 


6772 


015242 








015242 


103001 






015244 


000207 






015246 






6773 








6774 


015246 


004737 


015106 


6775 


015252 


004737 


037214 


6776 


015256 


000207 





114 
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**RECURSIVE** 

PAFBAU: SUBTST <<PATTERNS FORUARD , BANKS UORST FIRST **RECURSIVE**> > 
:*SUBTEST PATTERNS FORUARD. BANKS UORST FIRST **RECURSIVE** 



SEO 0177 



1*: 
2%: 



4$: 



5$: 

6$: 
7t: 



CLR 



PATTERN 



; START OF PATTERN LOOP 



CLR 



BANK 



: START OF BANK LOOP 



CALL EXBANK 

CALL BANKOK 

BNE 4$ 

TST ACFLAG 

BEQ 4$ 

TST BMFLAG 

BEQ 4$ 

TST RRFLAG 

BNE 4$ 

CALL MTEST 
i TERMINATION OF BANK LOOP 

CLR CONTFLAG 



SET PATTERN TO 0 
SET BANK TO 0 
EXAMINE BANK 

CORRECT MEMORY FOR THIS BANK? 
NO - GO TO BANK LOOP TERMINATOR 
CAN UE ACCESS THIS BANK? 
NO - 60 TO BANK LOOP TERMINATION 
IS THIS BAD MEMORY (UORST FIRST) 
NO - GO TO BANK LOOP TERMINATION 
RELOCATION REQUIRED? 
YES - GO TO BANK LOOP TERMINATION 
GO TEST CORRECT MEMORY 



CALL 
BGE 



INCBNK 
2% 



; TERMINATION OF PATTERN LOOP 



:NEXT HIGHER BANK 
:IF NOT DONE - LOOP ON THIS BANK 



CALL 
BNE 



INCRPT 
1$ 



iEND OF LOOPS 



;NEXT HIGHER PATTERN 
:0K - LOOP: ELSE CONTINUE 



COM 



TMFLAG 



BEQ 



5* 



{COMPLEMENT TYPE OF MEMORY 
:IS THIS AN EVEN NUMBER PASS? 
■ YES - SKIP 
i*«NOTE** RECURSIVE CALL* 
CALL PAFBAU ;CALL SELF 

RETURN 

COM UORST ;4TH PASS? 



BNE 6* ;YES 
:**NOTE** RECURSIVE CALL 



SKIP 



CALL PAFBAU 
RETURN 

TST RLFLAG 

BEQ 7$ 
RETURN 

CALL RELOCATE 

ON. ERROR THEN $RETURN 



;CALL SELF 

;HAVE UE BEEN RELOCATED? 
;N0 - SKIP 
;YES - RETURN 
iMOVE £ MAP PROGRAM 



;**NOTE** RECURSIVE CALL 
CALL PAFBAU ;CALL SELF 

CALL UNRELOCATE :UNMOVE £ UNMAP PROGRAM 

RETURN 



L133: 



BCC L133 
RTS PC 



CVMJAAO MSVll-J rCMORY OIAG. MACRO VOS.Olb Friday 15 Feb-85 
PATTERNS FORWARD. BANKS UORST FIRST ♦♦RECURSIVE** 



J14 

16:10 Page 



185 



SEQ 0178 



6779 015260 






6780 015260 


004737 


040510 


6781 






6782 015264 


005037 


002102 


6783 






6784 015270 


004737 


040052 


6785 015274 


004737 


040456 


6786 015300 


001010 




6787 015302 


005737 


002116 


6788 015306 


001405 




6789 015310 


005737 


002124 


6790 015314 


001002 




6791 015316 


004737 


015562 


6792 






6793 015322 


005037 


002222 


6794 015326 


004737 


040520 


6795 015332 


002356 




6796 






6797 015334 


005337 


002112 


6798 015340 


100351 




6799 






6800 015342 


005137 


002134 


6801 






6802 015346 


001403 




6803 






6804 015350 


004737 


015260 


6805 015354 


000207 




6806 015356 


005737 


002126 


6807 015362 


001401 




6808 015364 


000207 




6809 015366 


004/37 


036402 


6810 015372 






015372 


103001 




015374 


000207 




015376 






6811 






6812 015376 


004737 


015260 


6813 015402 


004737 


037214 


6814 015406 


000207 





♦♦RECURSIVE*^>> 



PARBAF: SUBTST <<PATTERNS REVERSE .BANKS FQRUARD 

;♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦*♦*♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦•♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦••♦ 

: ♦SUBTEST PATTERNS REVERSE. BANKS FQRUARD ♦♦RECURSIVE^* 

;♦♦•♦♦♦♦♦♦♦♦*♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦*♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦*♦♦♦♦♦••♦♦♦♦♦♦♦♦♦♦♦♦♦♦•♦♦♦♦♦♦♦ 



II: 
21: 



4$: 



5$; 



6$: 



CALL HIPAT 
; START OF PATTERN LOOP 



CLR 
.•START 
CALL 
CALL 
BNE 
TST 
BEQ 
TST 
BNE 
CALL 



BANK 
OF BANK 
EXBANK 
BANKOK 
44 

ACFLAG 
4$ 

RRFLAG 
4$ 



LOOP 



SET HIGHTEST PATTERNS 
SET BANK TO 0 
EXAMINE BANK 

CORRECT MEMORY FOR THIS BANK? 
NO - 60 TO BANK LOOP TERMINATOR 
CAN UE ACCESS THIS BANK? 
NO - 60 TO BANK LOOP TERMINATION 
RELOCATION REQUIRED? 
YES - 60 TO BANK LOOP TERMINATION 
GO TEST CORRECT MEMORY 



MTEST 

{TERMINATION OF BANK LOOP 
CLR CONTFLAG 

CALL INCBNK ;NEXT HIGHER BANK 

BGE 21 ilF NOT DONE - LOOP ON THIS BANK 

; TERMINATION OF PATTERN LOOP 
DEC PATTERN ;NEXT LOUER PATTERN 

BPL 1* sOK - LOOP; ELSE CONTINUE 

.-END OF 

" 5 COMPLEMENT 

:IS THIS AN 
:YES - SKIP 



COM 



LOOPS 
TMFLAG 



TYPE OF MEMORY 
EVEN NUMBER PASS? 



BEQ 



5* 



i^^NOTE^^ RECURSIVE CALL 
PARBAF 



CALL 
RETURN 
TST RLFLAG 
BEQ 61 
RETURN 

CALL RELOCATE 

ON. ERROR THEN IRETURN 



;CALL SELF 



;HAVE UE BEEN RELOCATED? 
sNO SKIP 
:YES - RETURN 
:MOVE £ MAP PROGRAM 



{♦♦NOTE*^ RECURSIVE CALL 
CALL PARBAF :CALL SELF 

CALL UNRELOCATE luNMOVE L UNMAP PROGRAM 

RETURN 



L134: 



BCC L134 
RTS PC 



CVMjAAO MSVll-J r«MORY 01 AG. 
PATTERNS RE VERSE, BANKS ''ORUARO 

6017 015410 



6818 

6819 

6820 

6821 

6822 

6823 

6824 

6825 

6826 

6827 

6828 

6829 

6830 

6831 

6832 

6833 

6834 

6835 

6836 

6837 

6838 

6839 

6840 

6841 

6842 

6843 

6844 

6845 

6846 

6847 

6848 

6849 

6850 

6851 

6852 

6853 

6854 

6855 



6856 
6857 
6858 
6859 



015410 

015414 

015420 
015424 
015430 
015432 
015436 
015440 
015444 
015446 
015452 
015454 

015460 
015464 
015470 

015472 
015476 



004737 

005037 

004737 
004737 
001013 
005737 
001410 
005737 
001405 
005737 
001002 
004737 

005037 
004737 
002353 

005337 
100346 



015500 005137 
015504 001403 



015506 
015512 
015514 
015520 

015522 
015526 
015530 
015534 
015536 
015540 
015544 
015544 
015546 
015550 

015550 
015554 
015560 



004737 
000207 
005137 
001003 

004737 
000207 
005737 
001401 
000207 
004737 

103001 
000207 



004737 
004737 
000207 



040510 

002102 

040052 
040456 

002116 

002130 

002124 

015562 

002222 
040520 

002112 

002134 

015410 
002600 

015410 
002126 

036402 



015410 
037214 



K14 

Page 187 



MACRO V05.01b Friday 15-Feb-85 16:10 
♦♦RECURSIVE** 

PARBAU: SUBTST <<PATTERNS REVERSE .BANKS UORST FIRS' **RECURSIVE**> > 

; «*************«♦♦•♦*♦♦♦♦«♦♦♦♦♦****************♦***•*♦♦*♦*****♦♦♦***«« 

:*SUBTEST PATTERNS REVERSE. BANKS UORST FIRST **RECURSIVE** 

; ^^♦♦♦•♦^♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦4 



SEQ 0179 



2%: 



4$: 



5$: 



6$: 



7$: 



CALL HIPAT 

; START OF PATTERN LOOP 

CLR BANK 

; START OF BANK LOOP 

CALL EXBANK 

CALL BANKOK 

BNE 4« 

TST ACFLAG 

BEQ 41 

TST BMFLAG 

BEQ 4$ 

TST RRFLAG 

BNE 4$ 

CALL MTEST 



; TERMINATION OF 
CLR CONTFLAG 
CALL INCBNK 
BGE 2$ 



BANK LOOP 



:SET HIGHTEST PATTERN 
sSET BANK TO 0 
EXAMINE BANK 

CORRECT MEMORY FOR THIS BANK? 

NO - GO TO BANK LOOP TERMINATOR 

CAN WE ACCESS THIS BANK? 

NO - GO TO BANK LOOP TERMINATION 

IS THIS BAD MEMORY (UORST FIRST) 

NO - GO TO BANK LOOP TERMINATION 

RELOCATION REQUIRED? 

YES - GO TO BANK LOOP TERMiriATION 

GO TEST CORRECT MEMORY 



: TERMINATION OF PATTERN LOOP 



;NEXT HIGHER BANK 
;IF NOT DONE - LOOP ON THIS BANK 



DEC 
BPL 
iEND 
COM 

BEQ 



OF 



PATTERN 
1* 

LOOPS 
TMFLAG 

5* 



J NEXT LOWER 
:0K - LOOP: 

COMPLEMENT 
IS THIS AN 
YES - SKIP 



PATTERN 

ELSE CONTINUE 

TYPE OF MEMORY 
EVEN NUMBER PASS? 



:^^NOTE*^ RECURSIVE CALL 
CALL PARBAU :CALL SELF 

RETURN 

COM UORST s4TH PASS? 

BNE 6* .-YES - SKIP 

;**NOTE^* RECURSIVE CALL 
CALL PARBAU ;CALL SELF 

RETURN 



TST RLFLA6 
BEQ 7* 
RETURN 

CALL RELOCATE 

ON. ERROR THEN $RETURN 



HAVE UE BEEN RELOCATED? 
NO - SKIP 
YES - RETURN 
MOVE 6 MAP PROGRAM 



:*^NOTE^* RECURSIVE CALL 
CALL PARBAU jCALL SELF 

CALL UNRELOCATE ;UNMOVE L UNMAP PROGRAM 

RETURN 



L135: 



BCC L135 
RTS PC 



CVMJAAO MSVll-J MEMORY 
PATTERNS REVERSE, BANKS 



OIAG. MACRO VOS.Olb Friday 15 Feb 85 16:10 
UORST FIRST **RECURSIVE** 



L14 

Page 189 



6862 


015562 








MTEST : 


SUBTST 


<<SUBR SETUP 


MEMORY 


TEST>> 




























!*SUBTEST 


SUBR SETUP 


MEMORY 


TEST 


















6863 


015562 










SET 


HEADER 




{INITIALIZE HEADER MESSAGE TYPEOUT 




015562 


012737 


177777 


002612 












MOV 


0-1. HEADER 


6864 


015570 










SET 


MUT 




; INDICATE THERE IS A MEMORY 


UNDER TEST 




015570 


A 4 9^ 

012737 


4 ^^^^^ 

llllll 


002110 












MOV 


0-1, MUT 


6865 


015576 


AAC A 

005037 


002264 






CLR 


PASFLG 








6866 


015602 


AAC^ 

005737 


AA'^ 4 '^A 

002120 






TST 


MKFLAG 




;ECC? 






6867 


015606 


A A 4 Jl 4 V 

001413 








BEQ 


MTl 




;N0 - SKIP 






6868 


015610 










BEGIN 


HOLDLOOP 










015610 
















B16: i ; 






6869 


015610 










IF CONTFLAG IS TRUE 


THEN LEAVE HOLDLOOP 








015610 


AAC^ 

005737 


A A ^ ^ ^ ^ 

002222 














T C T 

TST 


CONTFLAG 




015614 


AA 4 AAB 

001005 
















Due* 
BNc 


E16 


6870 


015616 










IF SKIPMK IS FALSE 












A 4 C£ 4 £ 

015616 


AAC ^ 

005737 


AA il 

002342 
















SKIPMK 




A 4 C £ ^ ^ 

015622 


A A 4 AA ^ 

00100 
















BNE 


L136 


6871 


A 4 ^ il 

015624 


AA Ik ^9 

00477 


A 4 C ^ 

015656 






CALL MKCONTROL 








6872 


A 4 V A 

015630 










END: 


OF IF SKIPMK 












A 1 C£ TA 

015630 
















L136; ; 






6873 


015630 










END 


HOLDLOOP 












A 4 C£ V A 

015630 
















E16: ; ; 






DO 1 *» 












CALL 


MKTEST 




sYES - DO ECC TESTS 






6875 


015634 


000402 








BR 


MT2 










6876 


015636 


004737 


017324 




MTl: 


CALL 


MJTEST 




sDO PARITY TESTS 






6877 


015642 


005037 


002110 




MT2: 


CLR 


MUT 




:NOU - NO MEMORY UNDER 


TEST 




6878 


015646 










SET 


HEADER 




: ALLOW HEADERS NORMAL 








015646 


012737 




002612 












MOV 


0-1. HEADER 


6879 


015654 


000207 








RETURN 











SEQ 0180 



CVMJAAO MSVll-J MEMORY DIAG. 
SUBR SETUP MEMORY TEST 

6862 015656 



6683 
6884 
6885 

6886 015656 
015656 005737 
015662 001401 
015664 000207 
015666 

6887 015666 
015666 005737 
015672 001401 
015674 000207 
015676 

6688 015676 

015676 013746 

015702 010046 

015704 010146 

015706 010246 

015710 010346 

6889 015712 012737 

6890 01ii720 012737 

6891 015726 005037 

6892 015732 005037 

6893 015736 005037 

6894 015742 013700 

6895 015746 016001 

6896 015752 000301 

6897 015754 042701 

6898 015760 006301 

6899 015762 010137 

6900 015766 005737 

6901 015772 001421 

6902 015774 005237 

6903 016000 012737 

6904 016006 005237 

6905 016012 005237 

6906 016016 016001 

6907 016022 072127 

6908 016026 042701 

6909 016032 050137 

6910 016036 005003 

6911 016040 116337 

6912 016046 042737 

6913 016054 
016054 
016060 

6914 016060 
016060 
016066 

6915 016066 
016066 010346 
016070 013703 002102 
016074 004737 035716 



002002 



002536 



002102 



060000 
157776 
002236 
002240 
002332 
002104 
002664 

177760 

002526 
00213b 

002240 
120000 
002332 
002236 
002664 
177775 
160777 
002526 

002526 
177741 



005037 016476 



MACRO V05.01b Friday 15-Feb-85 16 



M14 

10 Page 



191 



SEQ 0181 



MKCONTROL:SUBTST <<SUBR TEST ECC CSR LOGIC DISPATCH>> 

i ******************************«************************************«*«««**«*««« 

J ♦SUBTEST SUBR TEST ECC CSR LOGIC DISPATCH 

;THE NEXT TWO MODULES SOLVE THE PROBLEM OF 
iHOU TO RUN THE CSR TESTS ON EACH ECC MEMORY 



002232 
002234 



002234 



002152 
002152 



MKLOOP: MOVB 
SIC 
FOR 



IF SELONLY IS TRUE THEN $RETURN 



IF INHECC IS TRUC THEN ^RETURN 



PUSH BANK.R0,R1,R2,R3 



MOV #FIRST.CSRFBANK 

MOV OLAST.CSRLBANK 

CLR CSRINT 

CLR SPLTCSR 

CLR CSRLOOP 

MOV bankindex.ro 

MOV CONFIG(RO).R1 

SUAB Rl 

BIC *tCl7.Rl 

ASL Rl 

MOV Rl.CSRHOLD 

TST INTFLAG 

BEQ It 

INC SPLTCSR 

MOV «120000.CSRLBANK 

INC CSRLOOP 

INC CSRINT 

MOV C0NFIG(R0).R1 

ASH #-3.Rl 

BIC *tC17000,Rl 

BIS Rl.CSRHOLD 

CLR R3 

CSRH0L0(R3},CSRN0 
»tC36,CSRN0 
MKCNT :- «0 TO CSRINT 



L137: 



TST SELONLY 
BEQ L137 
RTS PC 



L140: 



TST INHECC 
BEQ L140 
RTS PC 



MOV BANK,-(SP) 
MOV RO.-(SP) 
MOV Rl.-(SP) 
MOV R2.-(SP) 
MOV R3.-(SP) 
;SET FIRST TEST ADDRESS TO FIRST AOOR. 



AND ZERO THE LOOP COUNTER 
GET THE BANK INDEX 
GET CSR NUMBER 



; STORE IN THE LOU BYTE 
;IS THIS BANK INTERLEAVED? 
i BRANCH IF NOT INTERLEAVED 



iUE MUST LOOP TMICE FOR AN INTERLEAVED BANK 
:GET THE INTERLEAVE CSR NUMBER 

iSTORE IT IN CSRHOLD'S UPPER BiTTE 



013737 002232 002226 



FOR CSRFIRST 



MAP BANK 



MOV 
CALL 



BANK,R3 
MAPPER 



: CLEAR ANY UNNECESSARY BITS 

CLR MKCNT 
B17:;iis:i 
CSRFBANK TO CSRLBANK BY »4000 

MOV CSRFBANK. CSRFIRST 

B20::::::: 
:MAP TEST SPACE TO BANK 

MOV R3. (SP) 



CVHjAAO MSVll-J MEMORY DIAG, MACRO V05 
SUBR TEST ECC CSR LOGIC DISPATCH 



I 



016100 


012603 




6916 016102 


104511 




6917 016104 






016104 






6918 016104 


005037 


002334 


6919 016110 






016110 


005737 


002116 


016114 


001503 




016116 


005737 


002124 


016122 


001100 




6920 016124 


013737 


002226 


6921 016132 


062737 


004000 


6922 016140 






016140 


013737 


002226 


016146 






6923 016146 


013737 


002412 


6924 016154 


005737 


002240 


6925 016160 


001404 




6926 016162 


062737 


040000 


6927 016170 


000403 




6928 016172 


062737 


000002 


6929 016200 


004737 


016500 


6930 016204 






016204 


103440 




6931 016206 


104424 




6932 016210 


005037 


002076 


6933 016214 






016214 


005037 


002452 


016220 






6934 016220 






016220 


012737 


177777 


6935 016226 


005037 


002264 


6936 016232 




002452 


016232 


013700 


6937 016236 






016236 


010346 




6938 016240 


010637 


002146 


6939 016244 


162737 


000002 


6940 016252 


004737 


017004 


6941 016256 






016256 


012603 




6942 016260 






016260 


005237 


002452 


016264 


023727 


002452 


016272 


003752 




016274 






6943 016274 


104423 




6944 016276 






016276 


012737 


177777 


6945 016304 






016304 


000407 




6946 016306 






016306 






6947 016306 






016306 


062737 


000004 


016314 


023737 


002412 
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SEQ 0182 



002230 
002230 

002412 
002414 

002414 
002414 



002612 



002146 



000027 



002334 



002412 
002230 



INVALIDATE 

BEGIN CSRSTUFF 



MOV (SP)«.R3 
INVALIDATE BACKROUND PATTERN 



CLR SUCCESS 

IF ACFLAG IS TRUE AND RRFLAG IS FALSE 



B21: 



MOV CSRFIRST.CSRLAST 
ADD MOOO.CSRLAST 

FOR TESTADD :- CSRFIRST TO CSRLAST BY «4 



1«: 
2«: 



MOV 
TST 
BEQ 
ADD 
BR 
ADD 
CALL 
ON.NOERROR 

CACHOFF 



TESTADD, TESTADD»2 
SPLTCSR 
1« 

M0000.TESTADD«2 
2i 

*2,TESTADD*2 
SBETEST 



B22: 



TST ACFLAG 
BEQ L141 
TST RRFLAG 
BNE L141 



MOV CSRFIRST. TEST ADD 



CLR NOPAR 
FOR I :- 00 TO #27 



SET HEADER 

CLR PASFLG 
LET RO I 

PUSH R3 

MOV SP.CTLKVEC 
SUB 02.CTLKVEC 
CALL CSRCASE 
POP R3 

END sOF FOR I 



CACHON 

SET SUCCESS 
LEAVE CSRSTUFF 
END ;QF ON.NOERROR 
END sOF FOR TESTADD 



BCS L14? 

:TURN CACHE OFF 
{INDICATE PARITY ACTION 



B23: 



CLR I 

MOV «-l, HEADER 



MOV I.RO 

;SAVE LOOP COUNTER 

MOV R3.-(SP) 
;SAVE VECTOR IN CSR OF tK 



{RESTORE LOOP COUNTER 

MOV (SP)»,R3 

INC I 
CMP 1.027 
BLE B23 

E23: 
iTURN CACHE ON 

MOV 0-1. SUCCESS 

BR E21 

L142:i:::i: 

ADO 04. TESTADD 

CMP TESTAOa. CSRLAST 
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016322 


003711 






016324 






6948 


016324 








016324 






6949 


016324 








016324 






6950 016324 








016324 


Wj ' i » 






016330 


001012 




6991 


016332 








016332 


104401 


067207 


695? 016336 








016336 


013746 


002102 




016342 


1Q4403 






016344 


003 






016345 


000 




6953 


016346 








016346 


104401 


067245 


6954 


016352 


004737 


050446 


6955 


016356 








016356 






6956 016356 








016356 


062737 


004000 




016364 


023737 


002226 




016372 


003635 






016374 






6957 


016374 


005237 


002240 


6956 


016400 








016400 


005237 


016476 




016404 


023737 


016476 




016412 


00362;> 






016414 






6959 


016414 


062737 


000002 


6960 


016422 


012737 


000001 


6961 


016430 


005203 




6962 


016432 


020337 


002332 


6963 


016436 


003002 




6964 


016440 


000137 


016040 


6%^ 


016444 


104472 




6966 


016446 








016446 


012737 


177777 


6967 


016454 


005037 


002240 


6966 


016460 








016460 


012603 






016462 


012602 






016464 


012601 






016466 


012600 






016470 


012637 


002102 


6969 


016474 


000207 




6970 016476 


000000 





1*: 



SCO 0163 



P© ;0F IF 
EM) CSRSTUFF 
IF SUCCESS IS FALSE 



E22: 
L141 
E21: 



BLE 

: i i i 



bin 



TYPEIT 
.DSABL 

nov 

TYPOS 
.BYTE 
• BYTE 
.DSABL 

TYPEIT 
.DSABL 



TYPE MSGA34 
.rtSGA34 
CRF 

TYPOCS BANK. < TYPES BANK NUMBER >. 3 



Stilil 

• t s • s 

TST 
BNE 



SUCCESS 
L143 



BANK.-(SP} 



S 
0 

CRF 

TYPE MSGS 34 
.t1SGB34 
CRF 

CALL PERBNK 
END sOF IF SUCCESS 



SAVE BANK FOR TYPEOUT 
TYPES BANK NUMBER 
GO TYPE-OCTAL ASCII 
TYPE 3 DIGIT(S) 
SUPPRESS LEADING ZEROS 



END; OF FOR CSRFIRST 



INC SPLTCSR 
END: OF FOR MKCNT 



L143: 



E20:: 



ADO 
CMP 
BLE 
I i i 1 1 1 



E17 

ADD »2.CSRFBANK 

MO" 01. SPLTCSR 

I R3 

CMf R3.CSRL00P 

BGT li 

JMP MKLOOP 

ECCINIT sTRAP ON DOUBLE BIT ERRORS (NORMAL) 

SET C0NTFLA6 

CLR SPLTCSR 

POP R3.R2.R1.ro. BANK 



INC 
CMP 
BLE 
: : i i i i • I 



04000. CSRFIRST 
CSRFIRST. CSRLBANK 
B20 



MKCNT 

MKCNT. CSRINT 
B17 



MOV O-LCONTFLAG 



MKCNT; 



RETURN 
.UORD 0 



MOV 
MOV 
MOV 
MOV 
MOV 



(SP)..R3 
{SP)..R2 
{SP)».R1 
(SP)..RO 
(SP)«.BANK 



s COUNTER FOR MKLOOP 
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SEQ 0184 



6973 016500 



6974 

6975 

6976 

6977 

6978 

6979 

6980 

6981 

6982 

6983 

6984 

6965 

6986 

6987 

6988 

6989 

6990 

6991 

6992 

6993 

6994 

6995 

6996 

6997 

6998 016500 
016500 
016502 
016504 

6999 016506 

7000 016512 

7001 016516 
016516 



7002 016524 

7003 016526 

7004 016530 
016530 
016532 

7005 016534 

7006 016536 

7007 016540 

7008 016542 
7009 

7010 016544 

7011 016546 
016546 
016550 

7012 016552 

7013 016554 

7014 016556 

7015 016560 
7016 

7017 016562 



104424 
104471 

005011 
005014 
005711 
001107 
005714 
001105 

104503 

005011 
005014 
005711 
001100 
005714 
001076 

104510 



SBETEST:SUBTST 
♦SUBTEST 



<<CHECK FOP SBE FREE LOCATIONS>> 
CHECK FOR SBE FREE LOCATIONS 



010046 
010146 
010446 

013701 002412 
013704 002414 

053737 002552 177776 



IN ORDER TO DETERHINE IF A LOCATION IS SBE FREE I DO THIS 

URITE ZEROS UITH ECC DISABLE 

READ ZEROS BACK 

IF NOT ZEROS THEN RETURN ERROR 

URITE ZEROS UITH ECC ENABLED BUT TRAPS DISABLED 

READ ZEROS BACK 

IF NOT ZEROS THEN RETURN ERROR 

TEST THE LOCATION FROM THE PAR'S (UITH NO PROGRAM FETCHES) 
IF THERE UERE ANY SBE'S OR DBE'S THEN RETURN ERROR 

COMPLIMENT ZEROS TO ONES UITH ECC DISABLE 
READ ONES BACK 

IF NOT ONES THEN RETURN ERROR 

URITE 100.. 100000. 00000 (CHECKBITS COMPLIMENT OF BEFORE) 

UITH ECC ENABLED BUT TRAPS DISABLED 
TEST THE LOCATION FROM THE PAR'S (UITH NO PROGRAM FETCHES) 
IF THERE UERE ANY SBE'S OR DBE'S THEN RETURN ERROR 



IF NONE OF THE ABOVE FORCES A RETURN ERROR THEN RETURN NO. ERROR 
ENABL LSB 

:PUSH R0,R1.R4 ONTO STACK 

MOV HO.-(SP) 
MOV Rl.-(SP) 
MOV R4.-(SP) 



PUSH R0.R1.R4 



MOV TEST ADD. Rl 
MOV TESTADD*2,R4 
TESTAREA 



BIS 
.DSABL 
CACHOFF 
ECCIDIS 
CLEAR 



TESTMODE.PSU 
CRF 



(R1).(R4) 



; ENTER TEST MODE 

jGO TO SYSTEM TEST MODE 



jTURN CACHE OFF 

i DISABLE ECC ON 1 SELECTED CSR 



TST 
BNE 
TST 
BNE 

CLRICSR 
CLEAR 



(Rl) 
SBENT 
(R4) 
SBENT 



(R1).(R4) 



CLR 
CLR 



(Rl) 
(R4) 



: CLEAR 1 SELECTED CSR 



TST 
BNE 
TST 
BNE 

TSTREAD 



(Rl) 
SBENT 
(R4) 
SBENT 



CLR 
CLR 



(Rl) 
(R4) 



;TEST LOC (Rl) £ TST FOR SBE (UITHOUT FETCHES) 



CVMJAAO MSVll-J MEMORY DIAG. 
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SEQ 0185 



70111 








IF #BIT15!BIK SET. IN GSR 




032737 


100020 


002150 






016572 


001415 










7019 016574 








SET SKPERR 


016574 


012737 


177777 


002066 






70P0 016602 


104512 






ERR6EN 


7021 016604 


013700 


002460 




MOV 


ERRAOO.RO 


7022 016610 


072027 


177774 




ASH 


#-4.R0 


7023 016614 


042700 


177600 




BIG 


»tC177.R0 


7024 016620 








IF BANK EQ RO THEN GOTO 


016620 


023700 


002102 








016624 


001454 










7025 016626 








END; OF 


IF #BIT15 


016626 












7026 016626 


104471 






ECCIDIS 




7027 016630 


005111 






COM 


(Rl) 


7028 016632 


005114 






COM 


(R4) 


7029 016634 


023711 


002614 




CMP 


ONES.(Rl) 


7030 016640 


001046 






BNE 


SBENT 


7031 016642 


023714 


002614 




CMP 


0NES.(R4) 


7032 016646 


001043 






BNE 


SBENT 


7033 












7034 016650 


104503 






CLRICSR 


(Rl) 


7035 016652 


005011 






CLR 


7036 016654 


012714 


100000 




MOV 


#BITl5,(R4) 


7037 016660 


005711 






TST 


(Rl) 


7038 016662 


001035 






BNE 


SBENT 


7039 016664 


022714 


100000 




CMP 


#BIT15.(R4) 


7040 016670 


001032 






BNE 


SBENT 


7041 








TSTREAD 




7042 016672 


104510 








7043 016674 








IF #BIT15!BIT4 SET. IN CSR 


016674 


032737 


100020 


002150 






016702 


001415 










7044 016704 








SET SKPERR 


016704 


012737 


177777 


002066 






7045 016712 


104512 






ERRGEN 


7046 016714 


013700 


002460 




MOV 


ERRAOO.RO 


7047 016720 


072027 


177774 
177600 




ASH 


#-4.R0 


7048 016724 

■ W • W W*W ■ 


042700 




6IC 


#tC177.R0 


7049 016730 








IF BANK EQ RO THEN GOTO 


016730 


023700 


002102 








016734 


001410 








IF «IT15 


7050 016736 








END; OF 


016736 












7051 








KERNEL 




7052 016736 


104417 








7053 016740 


104473 






ECCIINIT 


7054 016742 


104423 






CACHON 


R4.R1,R0 


7055 016744 








POP 


016744 


01^604 










01674O 


012601 










016750 


012600 










7056 016752 








$RETURN NOERROR 


016752 


000241 










016754 


000207 











BIT 0BIT15!BIT4.CSR 
BEQ L144 

:DISABLE ERRGEN' S ERROR PRINTOUT 

MOV tf-l. SKPERR 



CMP BANK.RO 
BEQ SBENT 



L144: 

J DISABLE ECC ON 1 SELECTED CSR 



: CLEAR 1 SELECTED CSR 



jTEST LOC (Rl) £ TST FOR SBE (WITHOUT FETCHES) 

BIT #BIT15!B1T4.CSR 
BEQ L145 

.•DISABLE ERRGEN' S ERROR PRINTOUT 

MOV #-1. SKPERR 



CMP BANK.RO 
BEQ SBENT 



L145: 



ENTER KERNEL MODE 

INITIALIZE 1 SELECTED CSR 

TURN CACHE ON 

POP RO.Rl 6 R4 FROM STACK 

MOV (SP)..R4 
MOV (SP)..R1 
MOV (SP)».RO 

CLC 

RTS PC 



7057 
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7058 
7059 



7060 
7061 
7062 
7063 



7064 
7065 



016756 
016760 
016760 
016762 
016764 
016766 
016770 
016772 
016772 
016774 
016776 
017000 
017000 
017002 



104503 

005011 
005014 
104417 
104473 
104423 

012604 
012601 
012600 

000261 
000207 



SBENT : CLRICSR 

CLEAR (R1).(R4) 



KERNEL 

ECCIINIT 

CACHON 

POP R4,R1,R0 



$ RETURN ERROR 
.OSABL LSB 



: CLEAR 1 SELECTED CSR 

CLR (RjlI 
CLR ( R4 ) 

ENTER KERNEL MODE 

INITIALIZE 1 SELECTED CSR 

TURN CACHE ON 

POP RO.Rl C R4 FROM STACK 

MOV (SP)».R4 
MOV vSP)».Rl 
MOV (SP)*.RO 

SEC 

RTS PC 



SEQ 0186 



F15 



CVnjAAO nSVll-J MEHOAY 01 AG. 
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7068 017004 



7069 



7070 

7071 

7072 

7073 

7074 

7075 

7076 

7077 

7078 

7079 

7080 

7081 

7082 

7083 

7084 

7085 

7086 

7087 

7088 

7089 

7090 

7091 

7092 

7093 

7094 

7095 

7096 

7097 

7098 

7099 

7100 

7101 

7102 



017004 
017004 
017006 
017010 



010046 
006316 

004737 017074 



017014 020222 



7103 



017016 
017020 
017022 
017024 
017026 
017030 
017032 
017034 
017036 
017040 
017042 
017044 
017046 
017050 
017052 
017054 
017056 
017060 
017062 
017064 
017066 
017070 
017072 
017074 
017074 
017074 
017076 
017100 
017102 
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CSRCASErSUBTST <<CSR PATTERN CASE STATEMENT >> 

; *************************************************** 

J ♦SUBTEST CSR PATTERN CASE STATEMENT 

; ***************************************************************************** 

CASE RO 

MOV RO.-(SP) 
ASL asp 
JSR PC. L 146 

; WARNING IF YOU CHANGE THIS TABLE ALSO 

! CHANGE ••♦DDWO" - "$DDW5" (THE PATTERN BIT MAP) 



SEQ 0187 



MKCSRT : 



•PAT 
MT0006 



TIME 
i<l SEC 



DESCRIPTION 
INITIAL DATA TEST 



MSVll-J ECC TESTS 



024024 


MT0044 


5 


SEC 


SHIFTING 1/0' S THROUGH CHECK BITS 


020354 


HT AA 1 A 


l 


ccr 


QACTP nni iRi c cDono tcct 

DHolL UUUdLC CnKUn 1 CO 1 


024104 


MT0045 


<1 


SEC 


SYNDROMES TO CSR ON DOUBLE BIT ERROR TEST 


023560 


MT0036 


1 


SEC 


CORRECTION CODE TEST 


020456 


MT0020 


1 


SEC 


SYNDROMES TO CSR ON SINGLE BIT ERROR TEST 


023622 


MT0037 


<1 


SEC 


ECC DISABLE TEST 


023660 


MT0041 


1 


SEC 


ADDRESS TO CSR ON DOUBLE BIT ERROR 


023740 


MT0042 


<1 


SEC 


EXTENDED ADDRESS TO CSR ON ERROR TEST 


023774 


MT0043 


<1 


SEC 


WRITE BYTE CLEARS SBE TEST 


024134 


MT0046 


1 


SEC 


CHECK SINGLE BIT ERRORS WITH ECC DISABLED TEST 


024164 


MT0047 


<1 


SEC 


NO CSR UPDATE ON SBE WITH EXSISTING OBE 


020320 


MTOOlO 


<1 


SEC 


BYTE ADDRESSING TEST 


024220 


MT0999 


0 


SEC 


NULL TEST 


024220 


MT0999 


0 


SEC 


NULL TEST 


024220 


MT0999 


0 


SEC 


NULL TEST 


024220 


MT0999 


0 


SEC 


NULL TEST 


024220 


MT0999 


0 


SEC 


NULL TEST 


024220 


MT0999 


0 


SEC 


NULL TEST 


024220 


MT0999 


0 


SEC 


NULL TEST 


024220 


MT0999 


0 


SEC 


NULL TEST 


024220 


MT0999 


0 


SEC 


NULL TEST 


024220 


MT0999 


0 


SEC 


NULL TEST 


024220 


MT0999 


0 


SEC 


NULL TEST 


END :0F CASE RO 








062616 








ADO (SP)».aSP 


013646 








MOV a(SP)».-(SP} 

JSR PC.a(SP)^ 


004736 








000207 


RETURN 









I 
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7106 017104 



7107 017104 
017104 
017112 
017114 
017120 
017122 

7108 017122 

7109 017124 
017124 
017126 

7110 017126 

7111 017130 
017130 

7112 017130 

7113 017136 

7114 017144 

7115 017150 

7116 017152 
017152 
017160 
017162 
017170 

7117 017172 

7118 017174 
017174 

7119 017174 

7120 017200 

7121 017206 

7122 017212 
017212 
017220 
017222 
017226 
017230 

7123 017230 

7124 017232 
017232 
017234 

7125 017234 

7126 017236 
017236 

7127 017236 

7128 017242 
7129 

7130 
7131 
7132 

7133 017244 

7134 017244 

7135 017246 

7136 017250 

7137 017252 

7138 017254 



032777 
001003 
005737 
001402 

104470 

000401 

104502 



012737 
012737 
013700 
006300 

026027 
001405 
026027 
001401 
104511 



010637 
162737 
004770 

032777 
001003 
005737 
001402 

104506 

000401 

104472 



005037 
000207 



023346 
020434 
020256 
017544 
017640 



000001 
002350 



000002 
000002 
002112 



017244 
017244 



002146 
000002 
017244 

000001 

002350 
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MKTEST: SUBTST <<SUBR ECC TEST DISPATCH>> 

; •SUBTEST SUBR ECC TEST DISPATCH 

IF «SUO SET. IN 9SUR OR ACTFLAG IS TRUE 
163524 BIT OSUO.SSUR 

BNE L147 
TST ACTFLAG 
BEQ LI 50 

L147: ;;;;;; 

ECCOIS : DISABLE ERROR CORRECTION 

ELSE 

BR L151 
L150: ;;;!;: 

CLRCSR : CLEAR ALL CSR'S 

END iOF IF 

L151; 



SEQ 0188 



002076 
002326 



023346 
024220 



002146 
163416 



002076 



MOV #2.N0PAR ; INDICATE PARITY ACTION 

MOV #2.PCBUMP STRAPS ADD 2 TO PC 

MOV PATTERN, RO ;GET PATTERN NUMBER 

ASL RO :MAKE IT A UORD ADDRESS 

IF MKPAT(RO) NE 0MT0034 AND MKPAT(RO) NE *MT0999 

CMP MKPAT(R0),»MT0034 
BEQ L152 

CMP MKPAT(R0).#MT0999 
BEQ LI 52 

INVALIDATE : INVALIDATE BACKGROUND PATTERN ON "BANK" 

END sOF IF MKPAT(RO) 



MOV 
SUB 
CALL 



SP.CTLKVEC 
ft2.CTLKVEC 
9MKPAT(R0} 



L152: 

sSAVE VECTOR IN CASE OF tK 



MKPAT : 



; INDEX OFF TABLE 
IF ffSUO SET. IN 9SUR OR ACTFLAG IS TRUE 

BIT «SU0.9SUR 
BNE L153 
TST ACTFLAG 
BEQ L154 

ENASBE ;TRAP ON SINGLE BIT ERRORS ' 

ELSE 

BR L155 

L154::;;;;; 

ECCINIT :TRAP ON DOUBLE BIT ERRORS (NORMAL) 

END iOF IF »SUO 

L155: 

CLR NOPAR : INDICATE PARITY ACTION 

RETURN 

WARNING IF YOU CHANGE THIS TABLE ALSO 
CHANGE "*ODUO" - "$DDU5" (THE PATTERN BIT MAP) 
PAT TIME DISCRIPTION 
NOTE MT0034 MUST BE FIRST £ LAST 



MT0034 
MT0017 
MT0007 
MTOOOl 
MT0002 



:<1 SEC 

:<1 SEC 

:<1 SEC 

:<! SEC 

:<1 SEC 



SOFT ERROR 
HOLDING I'S 
ADDRESS BIT TEST 
ADDRESS TEST 
COMPLEMENT ADDRESS TEST 



BACKGROUND PATTERN TEST 
£ O'S TEST 



cvnjAAo nsvii-j memory oiag. 

SUBR ECC TEST DISPATCH 



H15 
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SEQ 0189 



7139 


017256 


020070 


MT0004 


1 SEC 


ROTATING ZEROS TEST 


7140 


017260 


020140 


MT0005 


1 SEC 


ROTATING ONES TEST 


7141 


017262 


020536 


MT0021 


1 SEC 


MARCHING O'S L IS TEST 


1 7142 


017264 


021026 


MT0022 


10 SEC 


REFRESH & SHIFTING DIAGONAL TEST 


7143 


017266 


021332 


MT0026 


<1 SEC 


RANDOM DATA TEST 


7144 


017270 


021124 


MT0024 


20 SEC 


FAST GALLOPING PATTERN TEST 


7145 


017272 


022454 


MT0031 


3 SEC 


SOB-A-LONG TEST 


7146 


017274 


022644 


MT0032 


<1 SEC 


WRITE RECOVERY TEST 


7147 


017276 


023160 


MT0033 


35 SEC 


BRANCH GOBBLE TEST 


7148 


017300 


023346 


MT0034 


<1 SEC 


SOFT ERROR - BACKGROUND PATTERN TEST 


7149 






sNOTE MT0034 MUST BE FIRST 6 LAST 


7150 


017302 


024220 


MT0999 


0 SEC 


NULL TEST 


7151 


017304 


A'l ii 'I ^A 

024220 


MT0999 


0 SEC 


NULL TEST 


7152 


017306 


024220 


MT0999 


0 SEC 


NULL TEST 


7153 


017310 


A^il ^^A 

024220 


MT0999 


0 SEC 


NULL TEST 


7154 


017312 


024220 


MT0999 


0 SEC 


NULL TEST 


7155 


017314 


024220 


MT0999 


0 SEC 


NULL TEST 


7156 


017316 


024220 


MT0999 


0 SEC 


NULL TEST 


7157 


017320 


024220 


MT0999 


0 SEC 


.NULL TEST 


7158 


017322 


024220 


MT0999 


0 SEC 


iNULL TEST 



115 



CVMJAAO hSVll-J MEMORY DIAG. 
SUBR ECC TEST DISPATCH 

7161 017324 
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fIJTEST: SUBTST <<SUBR PARITY TEST DISPATCH>> 



SEQ 0190 



7162 
7163 
7164 
7165 
7166 
7167 
7168 



7169 
7170 

7171 
7172 
7173 
7174 
7175 
7176 
7177 
7178 
7179 
7180 
7181 
7182 
7183 
7184 
7185 
7186 
7187 
7188 
7189 
7190 
7191 
7192 
7193 
7194 
7195 
7196 
7197 
7198 
7199 
7200 
7201 
7202 
7203 
7204 
7205 
7206 



017324 
017332 
017340 
017346 
017354 
017360 
017362 
017362 
017370 
017372 
017400 
017402 
017404 
017404 
017404 
017410 
017416 
017422 
017426 



017430 
017430 
017432 
017434 
017436 
017440 
017442 
017444 
017446 
017450 
017452 
017454 
017456 
017460 
017462 
017464 
017466 
017470 
017472 
017474 

017476 
017500 
017502 
017504 
017506 



012737 
012737 
012737 
012737 
013700 
006300 

026027 
001405 
026027 
001401 
104511 



010637 
162737 
004770 
005037 
000207 



023346 
020222 
020434 
020256 
017544 
017640 
017754 
020070 
020140 
020536 
023446 
021026 
021060 
021332 
021124 
022454 
022644 
023160 
023346 

024220 
024220 
024220 
024220 
024220 



000002 
000002 
060000 
060002 
002112 



017430 
017430 



002146 
000002 
017430 
002076 



002076 
002326 
002412 
002414 



023346 
024220 



002146 



•SUBTEST SUBR PARITY TEST DISPATCH 

MOV 02.N0PAR ; INDICATE PARITY ACTION 

MOV *2.PCBUMP ; TRAPS ADO 2 TO PC 

MOV OFIRST.TESTADD 
MOV #FIRST»2,TESTADD*2 

MOV PATTERN, RO ;GET PATTERN NUMBER 

ASL RO :MAKE IT A WORD ADDRESS 

IF MJPAT(RO) NE 0MT0034 AND MJPAT(RO) NE #MT0999 

CMP MJPAT(RO),OMT0034 
BEQ L156 

CMP MJPAT(R0).0MT0999 
BEQ L156 

INVALIDATE ; INVALIDATE BACKGROUND PATTERN ON "BANK" 

END sOF IF MJPAT(RO) 



MJPAT : 



MOV 
SUB 
CALL 
CLR 

RETURN 



SP.CTLKVEC 
02.CTLKVEC 
aMJPAT(RO) 
NOPAR 



L1S6: 

;SAVE VECTOR IN CASE OF tK 



: INDEX OFF TABLE 

; INDICATE PARITY ACTION 



: WARNING IF YOU CHANGE THIS TABLE ALSO 

: CHANGE 'JDDUO" - "*DDU5" (THE PATTERN BIT MAP) 



•,PAT TIME 




DISCRIPTION 






:NOTE MT0034 MUST 


BE 


FIRST 6 LAST 






MT0034 


<1 


SEC 






SOFT ERROR - BACKGROUND 


PATTERN 


TEST 


MT0006 


<1 


SEC 






INITIAL DATA TEST 






MT0017 


<1 


SEC 






HOLDING I'S 6 O'S TEST 






MT0007 


.<1 


SEC 






ADDRESS BIT TEST 






MTOOOl 


!<1 


SEC 






ADDRESS TEST 






MT0002 


■<1 


SEC 






; COMPLEMENT ADDRESS TEST 






MT0003 


1 


SEC 






3 XOR 9 WORST CASE NOISE TEST 




MT0004 


1 


SEC 






ROTATING ZEROS TEST 






MT0005 


1 


SEC 






ROTATING ONES TEST 






MT0021 


1 


SEC 






MARCHING O'S 6 I'S TEST 






MT0035 


<1 


SEC 






.WORSE CASE NOISE PARITY 


TEST 




MT0022 


10 


SEC 






[REFRESH TEST 






MT0023 


10 


SEC 






■SHIFTING DIAGONAL TEST 






MT0026 


<1 


SEC 






.RANDOM DATA TEST 






MT0024 


20 


SEC 






:FAST GALLOPING PATTERN TEST 




MT0031 


3 


SEC 






.SOB-A-LONG TEST 






MT0032 


<1 


SEC 






WRITE RECOVERY TEST 






MT0033 


35 


SEC 






BRANCH GOBBLE TEST 






MT0034 


<1 


SEC 






SOFT ERROR - BACKGROUND 


PATTERN 


TEST 


:NOTE MT0034 MUST 


BE 


FIRST 6 LAST 






MT0999 


0 


SEC 






NULL TEST 






MT0999 . 


0 


SEC 






NULL TEST 






MT0999 


0 


SEC 






NULL TEST 






MT0999 


0 


SEC 






NULL TEST 






MT0999 


0 


SEC 






NULL TEST 







OIAG. 



CVMJAAO MSVll-J MEMORY 
PATTERNS 

7208 
7209 
7210 

7211 017510 



7212 017510 005037 002300 
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.SBTTL PATTERNS 

.SBTTL MEMORY TEST SETUP ROUTINES 
MTOOOO: SUBTST <<MTOOOO SETUP DATA PATTERN TEST>> 

; •SUBTEST MTOOOO SETUP DATA PATTERN TEST 



SEQ 0191 



7213 017514 

7214 017520 

7215 017524 

7216 017530 

7217 017536 

7218 017542 

7219 017544 



012700 
012701 
004737 
012737 
004737 
000207 



060000 
040000 
032470 
024640 
024446 



002262 



: SETUP PATTERN NUMBER FOR TYPEOUT 6 DISPLAY 



iELSE DO PATTERN IN MAIN MCMORY 



7220 


017544 


012737 


000001 


002300 




MOV 


#1.REALPAT 


7221 


017552 


012700 


060000 






MOV 


OFIRST.RO 


7222 


017556 


012701 


040000 






MOV 


«SIZE,R1 


7223 


017562 


005737 


002456 






TST 


NOSUPER 


7224 


017566 


001005 








BNE 


2$ 


7225 


017570 


023737 


172252 


172254 




CMP 


SIPAR5,SIPAR6 


7226 


017576 


001007 








BNE 


4$ 


7227 


017600 


000404 








BR 


31 


7228 


017602 


023737 


177652 


177654 


2$: 


CMP 


UIPAR5.UIPAR6 


7229 


017610 


001002 








BNE 


4$ 


7230 


017612 


012701 


030000 




3$: 


MOV 


«30000.R1 


7231 


017616 


005002 






4$: 


CLR 


R2 


7232 


017620 


004737 


032470 






CALL 


REGCOPY 


7233 


017624 


012737 


024664 


002262 




MOV 


#MTP001,SUPD0A0D 


7234 


017632 


004737 


024446 






CALL 


SUPD03 


7235 


017636 


000207 








RETURN 





CLR 
MOV 
MOV 
CALL 
MOV 
CALL 
RETURN 

MTOOOl: SUBTST <<MT0001 SETUP ADDRESS TEST>> 

; ♦SUBTEST MTOOOl SETUP ADDRESS TEST 

: SETUP PATTERN NUMBER FOR TYPEOUT 6 DISPLAY 



REALPAT 
«FIRST.RO 
«SIZE,R1 
REGCOPY 

«MTPOO0.SUP00ADD 
SUPD03 



.•SET UP CALLING ADDRESS 



K15 
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MT0002 SETUP COMPLEMENT ADDRESS TEST 



SEQ 0192 



7236 017640 



7237 
7238 
7239 
7240 
7241 
7242 
7243 
7244 
7245 
7246 
7247 
7248 
7249 
7250 
7251 
7252 
7253 
7254 
7255 
7256 



017640 
017646 
017652 
017656 
017662 
017666 
017672 
017674 
017702 
017704 
017706 
017714 
017716 
017722 
017726 
017732 
-^17736 
017740 
017746 
017752 



012737 
012700 
012701 
012704 
012705 
005737 
001005 
023737 
001013 
000404 
023737 
001006 
012701 
012700 
012705 
012702 
010103 
012737 
004737 
000207 



000002 002300 

160000 

040000 

060000 

100001 

002456 

172252 172254 



177652 177654 2*; 



030000 
140000 
120001 
000001 

024716 
024446 



MT0002: SUBTST <<MT0002 SETUP COMPLEMENT ADDRESS TLST>> 

; ♦SUBTEST MT0002 SETUP COMPLEMENT ADDRESS TEST 



3$: 



4$: 



002262 



MOV 02.REALPAT 

MOV «LAST*2.R0 

MOV ffSIZE.Rl 

MOV dFIRST,R4 

MOV *100001,R5 

TST NOSUPER 

BNE 2$ 

CMP SIPAR5.SIPAR6 

BNE 4$ 

BR 3$ 

CMP UIPAR5,UIPAR6 

BNE 4$ 

MOV #30000, Rl 

MOV #140000. RO 

MOV #1 20001. R5 

MOV #1.R2 

MOV R1.R3 

MOV #MTP002,SUPD0ADD 

CALL SUPD03 

RETURN 



: SETUP PATTERN NUMBER FOR TYPEOUT £ DISPLAY 



:SET UP CALLING ADDRESS 
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MT0002 SETUP COMPLEMENT ADDRESS TEST 



L15 

Page 202 



SEQ 0193 



7259 017754 








MT0003: 


SUBTST 


<<MT0003 SETUP 


3 XOR 9 WORST CASE NOISE TEST>> 




















: •SUBTEST 


MT0003 SETUP 3 XOR 9 


wr^ST CASE NOISE TEST 










■ ******************************** ************* 


7260 017754 










IF EQFLAG IS TRUE THEN JRETUP' 




017754 


005737 


002132 










TST EQFLAG 


017760 


001401 












BEQ L1S7 


017762 


000207 












RTS PC 


017764 














L157: ; a;;; 

i SETUP PATTERN NUMBER FOR TYPEOUT £ DISPLAY 


7261 017764 


012737 


000003 


002300 




MOV 


03,REALPAT 


7262 017772 


005037 


002326 






CLR 


PCBUMP 


; TRAPS DO NOT ADD TO PC 


7263 017776 


004737 


032500 




1$: 


CALL 


FLIPUARN 


: SETUP WARNING CONSTANTS C R2 


7264 020002 


012701 


060000 




2i: 


MOV 


OFIRST.Rl 


jRl <-- STARTING ADDRESS 


7265 020006 


012703 


020000 






MOV 


«20000.R3 




7266 020012 


072327 


177770 






ASH 


0-8. .R3 


iR3 <-- R3 / 256, 


7267 020016 


012702 


000004 






MOV 


»4.R2 


: SMALL LOOP SIZE 


7268 020022 


012705 


000100 






MOV 


#64. ,R5 


(MEDIUM LOOP SIZE 


7269 020026 


104415 








SAVREG 






7270 020030 


012737 


024750 


002262 




MOV 


»MTPAO3,SUP0OA00 




7271 020036 


004737 


024446 






CALL 


SUPD03 


iDO IT IN MAIN MEMORY 


7272 020042 


104416 








RESREG 






7273 020044 


012737 


025010 


002262 




MOV 


»MTPBO3,SUP00A00 




7274 020052 


004737 


024462 






CALL 


SUPD04 




7275 020056 


022737 


000003 


002616 


4$: 


CMP 


03,FLIPL0C 


jDumE WITH 4 PATTERNS 


7276 














: [ ( 0 . 177777 ) : ( 177777 . 0 ) j (401 . 177777 ) j ( 177777 .401 ) 1 ? 


7277 020064 


001344 








BNE 


11 


:N0 - LOOP 


7278 020066 


000207 








RETURN 






7279 
















7280 020070 








HT0004: 


SUBTST 


<<MT0004 SETUP 


ROTATING ZEROS TEST>> 



7281 
7282 
7283 
7284 
7285 
7286 
7287 
7288 
7289 
7290 



7291 
7?92 
7293 
7294 
7295 
7296 
7297 
7298 
7299 
7300 
7301 



020070 
020076 
020104 
020110 
020114 
020120 
020124 
020132 
020136 
020140 



020140 
020146 
020154 
020156 
020162 
020166 
020172 
020200 
020206 
020212 
020220 



012737 
012737 
013702 
004737 
012700 
012701 
012737 
004737 
000207 



012737 
012737 
005002 
004737 
012700 
012701 
012737 
012737 
004737 
012737 
000207 



000004 002300 

000004 002326 

002614 

032630 

060000 

040000 

025106 002262 
024462 



;********************************************************** ********************* 

i ♦SUBTEST MT0004 SET'JP ROTATING ZEROS TEST 

******** *********************************************************************** 



04,REALPAT 
04. PCBUMP 
0NES.R2 
BACKGrW 
OFIRST.RO 
OSIZE.Rl 

OMTPA04.SUPDOADD 
SUPD04 



000005 
000004 

032630 
060000 
040000 
025162 
025176 
024462 
025122 



002300 
002326 



002262 
025160 

025160 



MOV 
MOV 
MOV 
CALL 
MOV 
MOV 
MOV 
CALL 
RETURN 

MT0005: SUBTST <<MT0005 SETUP ROTATING ONES TEST>> 

; ******************************************************************************* 

!«SUBTEST MT0005 SETUP ROTATING ONES TEST 

i ******************************************************************************* 



; SETUP PATTERN NUMBER FOR TYPEOUT £ DISPLAY 
.•TRAPS ADD 4 TO PC 

: WRITE BACKGROUND OF ONES 



sSET UP LINKS 



MOV 05,REALPAT 

MOV 04, PCBUMP 

CLR R2 

CALL BACKGNO 

MOV OFIRST.RO 

MOV OSIZE.Rl 

MOV 0MTP005.SUPD0ADD 

MOV 0MTP005*14.MTPB04»16 

CALL SUPD04 

MOV 0MTPA04*14,MTPB04*16 
RETURN 



s SETUP PATTERN NUMBER FOR TYPEOUT £ DISPLAY 
: TRAPS ADD 4 TO PC 

: WRITE BACKGROUND OF ZEROS 



;SET UP LINKS 



i RESET TEST'S ORIGINAL VALUE 
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MT0005 SETUP ROTATING ONES TEST 



M15 

Psg« 204 



SEQ 0194 



7304 020222 



7305 
7306 
7307 
7308 
7309 
7310 
7311 



7312 
7313 
7314 
7315 
7316 
7317 
7318 
7319 
7320 
7321 



020222 
020230 
020236 
020242 
020250 
020254 
020256 



020256 
020264 
020266 
020272 
020276 
020302 
020304 
020312 
020316 
020320 



7322 020320 

7323 020326 

7324 020334 

7325 020340 

7326 020346 

7327 020352 



012737 
012737 
012701 
012737 
004737 
000207 



012737 
005002 
004737 
012701 
012702 
050201 
012737 
004737 
000207 



000006 
000004 
002412 
025216 
024446 



000007 002300 

032630 
060000 
000001 



025416 
024446 



012737 000010 

012737 000004 

013704 002412 

012737 025516 

004737 024446 
000207 



MT0006: SU6TST 
!*SUBTEST 

; ************** 

002300 MOV 
002326 MOV 
MOV 

002262 MOV 
CALL 
RETURN 
MT0007: SUBTST 
; ************** 
{♦SUBTEST 

; ************** 

MOV 
CLR 
CALL 
MOV 
MOV 
BIS 

002262 MOV 
CALL 
RETURN 
MTOOlO: SUBTST 

; ************** 

; ♦SUBTEST 

; ************** 

002300 MOV 
002326 MOV 
MOV 

002262 MOV 
CALL 
RETURN 



<<MT0006 SETUP INITIAL DATA TEST>> 

*********************************** m ******************* ******** 

MT0006 SETUP INITIAL DATA TEST 
***************************************************************** 

#6.REALPAT ; SETUP PATTERN NUMBER FOR TYPEOUT £ DISPLAY 

#4,PCBUMP ; TRAPS ADD 4 TO PC 

#TESTADD.R1 

#MTP006.SUPDOADD 

SUPD03 -.DO 1, IN SUPERVISOR MODE 

<<MT0007 SETUP ADDRESS BIT TEST>> 

***************************************************************** 



MT0007 SETUP ADDRESS BIT TEST 
***************************************************************** 



#7.REALPAT 
R2 

BACKGND 
OFIRST.Rl 
«1.R2 
R2.R1 

0MTP007,SUPD0ADD 
SUPD03 



s SETUP PATTERN NUMBER FOR TYPFOUT £ DISPLAY 
;0F ZEROS 

;D0 IT IN SUPERVISOR MODE 



<<MT0010 SETUP BYTE ADDRESSING TEST>> 

***************************************************************** 

MTOOlO SETUP BYTE ADDRESSING TEST 
***************************************************************** 

#10.REALPAT J SETUP PATTERN NUMBER FOR TYPEOUT £ DISPLAY 

#4.PCBUMP ; TRAPS ADD 4 TO PC 

TEST ADD. R4 
#MTP010.SUPOOADD 

SUPD03 :D0 IT IN SUPERVISOR MODE 



N15 
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MTOOlO SETUP BYTE ADDRESSING TEST SEq oi95 

7330 020354 MT0014: SUBTST <<MT0014 SETUP BASIC DOUBLE BIT ERROR TEST>> 

!*Sl«TEST MT0014 SETUP BASIC DOUBLE BIT ERROR TEST 



7tT 1 










ADTPI Ar 


T c T Ol IP 
Is 1 NUC 






OOS737 








TCT arTCi Ar 

19 1 HtlrLHu 






001 003 








BMP 1 1 t^n 






OOS737 

VV3 19 1 


ftfl335a 






TCT ADTCI ar 
1 3 1 nr 1 r L n\i 






001 AO A 








npQ 1 1&1 
















' JVC 


0P0370 






TP iPA^^ MP flO THPN 


iDPTIlDM 






090370 


005737 








TCT IPAQC 




0P0374 










RPQ 1 




020376 


000207 








RTS PC 




020400 










L162: : ; s : ; s 


7333 


020400 






END; OF IF ACTFLA6 






020400 












7334 


020400 


012737 


000014 002300 


MOV #14.REALPAT 




: SETUP PATTERN NUMuER FOR TYPEOUT £ DISPLAY 


7335 


020406 


004737 


037740 


CALL MAPKERNAL 




J MAP KERNAL SPACE 


7336 


020412 






LET Rl #100000 




.SETUP TEST ADDRESS 




020412 


012701 


100000 






MOV #100000. Rl 


7337 


020416 


004737 


032674 


CALL GETCSR 




sGET CSR INFO FROM CONFIGURATION TABLE 


7336 


020422 


004737 


025624 


CALL MTP014 




iDO BASIC DOUBLE BIT ERROR TEST 


73^9 


020426 


004737 


040026 


CALL UNMAP 




: UNMAP KERNAL SPACE 


7340 


020432 


000207 




RETURN 







Bie 
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1T0014 SCTUP BASIC DOUBLE BIT CMOD TEST 



scQ om 



/344 0P0434 



734? 020434 

7346 020442 

7347 020450 
7548 020454 



012737 
012737 
004737 
000207 



m0017: SUBTST 
•SUBTEST 



000017 
026050 
024446 



002300 
002262 



nov 

NOV 

CALL 

RETURN 



<<«T0017 SETUP HOLDING I S £ 0'«;>> 

riTOOlT SETUP HOLDING I'S £ O'S 

: SETUP PATTERN NUMBER FOR TYPEOUT £ DISPLAY 
iOO IT IN SUPERVISOR MODE 



•17.REALPAT 

•MTP017.SUP00ADD 

SUPD03 
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MT0017 SETUP HOLDING I'S t O'S 



C16 

Fagc 210 



71* 1 

' m 










vc V* 


























00*57^7 






















0P047P 








0p647P 


005757 






A 304 76 


001401 








000P07 






0P050P 






7394 


0P050P 














' ^jj 


VC V JVC 


01P757 


OOOOPO 00P3OO 


7356 


020510 


004737 


037740 


7357 


020514 








020514 


012701 


100000 


7358 


020520 


004737 


032674 


7359 


020524 


004737 


026126 


7360 


020530 


004737 


040026 


7361 


020534 


000207 





m0020: SUBTST <<m0020 SETUP SYNORGTCS TO CSR ON SINGLE BIT ERflOR>> 

•SUBTEST m0020 SETUP SYWWES TO CSR ON SINGLE BIT ERROR 

IF MCTFLW; IS TRUE OR W>TFLAG IS TRUt ' * 



IF (PASS NE «0 THEN (RETURN 



ENO; OF IF ACTFLAG 

MOV 020.REALPAT 
CALL MAPKERNAL 
LET Rl 0100000 

CALL GETCSR 
CALL ttTP020 
CALL UNMAP 
RFTURN 



L163. 

L16S: 
L164: 



TST ACTFLAG 
BNE L163 
TST APTFLAG 
BEQ L164 

: • : s i i 

TST {PASS 
BEQ L165 
RTS PC 



SCO 0197 



SETUP PATTERN NUMBER FOR IyPEOUT £ DISPLAY 
MAP KERNAL SPACE 
SETUP TEST ADDRESS 

MOV #1 00000. Rl 
GET CSR INFO FROM CONFIGURATION TABLE 
00 SYNDROMES TO CSR ON SINGLE ERROR TEST 
UNMAP KERNAL SPACE 
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nT0020 SETUP SYNOAOrCS TO CSA ON SINGLE BIT ERROR 



SEQ 0198 



7363 020536 



7364 

7365 

7366 

7367 

7368 

7369 

7370 

7371 

7372 

7373 

7374 

7375 

7376 

7377 

7378 

7379 

7380 

7381 

7382 

7383 

7384 

7385 

7386 

7387 

7388 

7389 

7390 

7391 

7392 

7393 

7394 

7395 

7396 

7397 

7398 

7399 

7400 

7401 

7402 

7403 

7404 

7405 

7406 

7407 

7408 

7409 



020536 

020536 

020544 

020552 

020556 

020562 

020564 

020566 

020572 

020574 

020600 

02 '^606 

020610 

020616 

020620 

020626 

020630 

020634 

020636 

020644 

020646 

020652 

020654 

020662 

020666 

020674 

020700 

020702 

020710 

020714 

020722 

020726 

020730 

020736 

020740 

020744 

020746 

020754 

020760 

020766 

020772 

020774 

021002 

021006 

021014 

021020 

021024 



012737 

012737 

013702 

004737 

010203 

000303 

012701 

010105 

012704 

022737 

001450 

022737 

001407 

022737 

001003 

012701 

010105 

022737 

001003 

012701 

010105 

012737 

004737 

012737 

004737 

010401 

012737 

004737 

012737 

004737 

000434 

022737 

001003 

012701 

010105 

012737 

004737 

012737 

004737 

010401 

012737 

004737 

012737 

004737 

005037 

000207 



NTOOZl: SUBTST 
•SUBTEST 



<<nT0021 SETUP MARCHING O'S 6 I'S TEST>> 

m0021 SETUP MARCHING O'S & I'S TEST 









SET NOSCOPE 


177777 


002440 








000021 


002300 




nov 


A^f DCAI DAT 


002632 






nov 


DA^DAT 

DnKrAI ,H2 


032630 








DHLKbNU 








Mnti 

nuv 


He, NO 










K3 


160000 






nuv 


Al ACT ^3 D1 








nuv 


nl ,Kd 


060000 






nuv 


actoct da 


000005 

www ^ 


004010 

V W ▼ V A w 




rMD 


AC DOnTVD 








DCU 


J. « 


000003 


004010 




PMO 

LHr 


AT DDDTYD 
wO a rnU 1 ' r 








DCU 




000007 


002102 




\,yXr 


A7 RAMI/ 








PMC 


J* 


140000 

w w 






nuv 


AiAnnnn oi 

vmuUvU » ni 








nuv 


D1 DC 
K J, , nj 


000177 


002102 


3$ : 


rMD 


£177 RAMk 








oric 


c* 
J* 


140000 






nuv 


KlHUUUU • nl 








nuv 


R1 RS 
nil n J 


026442 


002262 


5$: 


nuv 




024446 










026472 


002262 




nuv 


fiMTPFoi <tiiPr)nAnn 

frn 1 rDC-1 « OUr UUnuU 


024462 


















R4.R1 


026526 


002262 






dMTPrPI SUPOQADO 


024462 






v«nLL 




026562 


002262 




MDU 
nuv 


dMTPnPI miPnoAOD 


024462 








<>upr)n4 








RR 


2$ 


000177 


002102 


1*: 




dl77 BANK 








4$ 


140000 






1 lU* 


0140000 Rl 






MOV 


R1,R5 


026442 


002262 


4$: 


MOV 


»MTPA21.SUPD0ADD 


024446 






CALL 


SUPD03 


026472 


002262 




MOV 


»MTPB21.SUP00ADD 


024462 






CALL 


SUP004 






MOV 


R4 Rl 


026526 


002262 




MOV 


*MTPC21.SUPD0ADD 


024462 






CALL 


SUPD04 


026562 


002262 




MOV 


*MTPD21.SUPD0ADD 


024462 






CALL 


SUPD04 


002440 




2«: 


CLR 


NOSCOPE 








RETURN 





MOV #- I. NOSCOPE 
; SETUP PATTERN NUMBER FOR TYPEOUt fi DISPLAY 



IS THIS AN 11/83 
BRANCH IF IT IS 
IS THIS AN 11/24? 
BRANCH IF SO 



E16 
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S TEST 



SEQ 0199 



7412 
7413 



7414 
7415 
7416 
7417 
7418 
7419 



021026 
021032 
021032 
021034 
021036 
021036 
021044 
021052 
021056 

021060 



004737 024234 



103001 
000207 

012737 
012737 
004737 
000207 



000022 
026612 
024446 



002300 
002262 



7420 


021060 


004737 


024234 




7421 


021064 
021064 
021066 
021070 


103001 
000207 






7422 


021070 


012737 


000023 


002300 


7423 


021076 


012737 


026612 


002262 


7424 


021104 










021104 


012737 


177777 


002004 


7425 


021112 


004737 


024446 




7426 


021116 


005037 


002004 




7427 


021122 


000207 







NT0022: SUBTST <<HT0022 SETUP REFRESH f, SHIFTING DIAGONAL TEST>> 

•SUBTEST nT0022 SETUP REFRESH £ SHIFTING DIAGONAL TEST * **** 



CALL KAMITEST 

ON. ERROR THEN (RETURN 



nov 

MOV 

CALL 

RETURN 



»22. REALPAT 

»MTPO22,SUPD0ADD 

SUPD03 



: CHECK FOR KAMIKAZE MODE 

:IF NOT IN KAMIKAZE MODE RETURN 

BCC L166 

RTS PC 
L166::::iii 
: SETUP PATTERN NUMBER FOR TYPEOUT 6 DISPLAY 

:D0 IT IN SUPERVISOR MODE 



MT0023: SUBTST <<MT0023 SHIFTING DIAGONAL TEST>> 

:«*********************************************************«********«*********«« 

;«SUBTEST MT0023 SHIFTING DIAGONAL TEST 

i************************************** ***************** 



CALL KAMITEST 
ON. ERROR THEN (RETURN 



MOV 
MOV 
SET 

CALL 
CLR 

RETURN 



«23. REALPAT 

«MTPO22.SUPD0ADD 

DIAGFLAG 

SUP003 
DIAGFLAG 



; CHECK FOR KAMIKAZE MODE 
:IF NOT IN KAMIKAZE MODE RETURN 

BCC L167 

RTS PC 
L167::iis:i 
: SETUP PATTERN NUMBER FP*? TYPEOUT 6 DISPLAY 

; IDENTIFY DIAGONAL TEST TO MTP022 

MOV 0-1. DIAGFLAG 
:D0 IT IN SUPERVISOR MODE 



CVMJAAO MSVll-J MEMORY 01 AG. 
MT0023 SHIFTING DIAGONAL TEST 

7429 021124 



7430 
7431 



7432 

7433 
7434 
7435 
7436 
7437 
7438 
7439 
7440 
7441 
7442 
7443 
7444 
7445 
7446 
7447 
7448 
7449 
7450 
7451 
7452 
7453 
7454 
7455 
7456 
7457 
7458 
7459 
7460 
7461 
7462 
7463 
7464 
7465 
74b6 
7467 



021124 
021130 
021130 
021132 
021134 
021134 
021134 
021142 
021150 
021154 
021160 
021162 
021164 
021166 
021172 
021176 
021204 
021206 
021214 
021216 
021224 
021226 
021232 
021240 
021242 
021246 
021250 
021252 
021260 
021262 
021270 
021272 
021276 
021300 
021306 

021312 
021314 
021316 
021320 
021324 
021330 



004737 024234 

103001 
000207 
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MT0024: SUBTST <<MT0024 SETUP FAST GALLOPING PATTERN TEST>> 

i •SUBTEST MT0024 SETUP FAST GALLOPING PATTERN TEST 



SEQ 0200 



CALL KAMITEST 
ON. ERROR THEN $RETURN 











SET 


NOSCOPE 


012737 


177777 


002440 






*24,REALPAT 


012737 


000024 


002300 




MOV 


013702 


002632 






MOV 


BAKPAT,R2 


004737 


032630 






CALL 


BACKGND 


010203 








MOV 


R2,R3 


010304 








MOV 


R3.R4 


000304 








SUAB 


R4 


012701 


060000 






MOV 


#FIRST,R1 


012705 


157776 






MOV 


*LAST ,R5 


022737 


000005 


004010 




CMP 


#5.PR0TYP 


001426 








BEQ 


1* 

*3.PR0TYP 


022737 


000003 


004010 




CMP 


001406 








BEQ 


3? 


022737 


000007 


002102 




CMP 


#7 , BANK 


001002 








BNE 




012705 


137776 






MOV 


«37776.R5 


022737 


000177 


002102 


3i : 


CMP 


wl77 , BANK 


001003 








BNE 


ft 


012701 


137776 






MOV 


#137776 ,R1 


010105 








MOV 


n « DC 
Rl iR5 


104415 






If. 






012737 


027326 


002262 




MOV 


#MTPB24.SUPD0ADD 


000412 








BR 




022737 


000177 


002556 


U: 


CMP 


#177.LASTBANI< 


001002 








BNE 


4$ 


012705 


137776 






MOV 


#137776. R5 


104415 






4$: 


SAVREG 




012737 


027326 


002262 




MOV 


#MTPB24.SUPD0AD0 


004737 


024462 




2$: 


CALL 


SUPD04 






:D0 IT 


AGAIN FOR COMPLEM 


104416 








RESRE6 


R2 


000302 








SUAB 


000303 








SUAB 


R3 


004737 


024462 






CALL 


SUPD04 


005037 


002440 






CLR 


NOSCOPE 


000207 








RETURN 





.•CHECK FOR KAMIKAZE MODE 
:IF NOT IN KAMIKAZE MODE RETURN 

BCC L170 
RTS PC 

L170:;;:!s: 

MOV ff-1. NOSCOPE 
; SETUP PATTERN NUMBER FOR TYPEOUT C DISPLAY 
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MT0024 SETUP FAST GALLOPING PATTERN TEST 



SEQ 0201 



7470 021332 



7471 

7472 

7473 

7474 

7475 

7476 

7477 

7478 

7479 

7480 

7481 

7482 

7483 

7484 

7485 

7486 

7487 

7488 

7489 

7490 

7491 

7492 

7493 

7494 

7495 

7496 

7497 

7498 

7499 

7500 

7501 

7502 

7503 

7504 

7505 

7506 

7507 

7508 

7509 

7510 

7511 

7512 

7513 



021332 

021340 

021344 

021350 

021354 

021356 

021360 

021364 

021370 

021376 

021400 

021406 

021410 

021416 

021420 

021424 

02143? 

021434 

021440 

021442 

021450 

021456 

021462 

021466 

021474 

021502 

021504 

021510 

021512 

021520 

021522 

021526 

021530 

021536 

021544 

021550 

021554 

021562 

021570 

021572 

021576 

021602 

021606 



012737 

005037 

013703 

013702 

010305 

010204 

012701 

012700 

022737 

001445 

022737 

001406 

022737 

001002 

012700 

022737 

001002 

012700 

104415 

012737 

012737 

004737 

005037 

012737 

012737 

104416 

004737 

000432 

022737 

001002 

012700 

104415 

012737 

012737 

004737 

005037 

012737 

012737 

104416 

004737 

010337 

010237 

000207 



MT0026: SUBTST 

;*SUBTEST 

000026 002300 MOV 
002326 CLR 
002604 MOV 
002602 MOV 

MOV 
MOV 

060000 MOV 
020000 MOV 
000005 004010 ChP 

BEQ 

000003 004010 CMP 

BEQ 

000007 002102 CMP 

BNE 

014000 MOV 
000177 002102 3*: CMP 

BNE 

014000 MOV 

7$: SAVREG 
027364 027464 MOV 
027360 002262 MOV 
024446 CALL 
027410 CLR 
027400 027464 MOV 
027374 002262 MOV 

RESREG 

024446 CALL 

BR 

000177 002102 1$: CMP 

BNE 

014000 MOV 

4$: SAVREG 
027364 027464 MOV 
027360 002262 MOV 
024446 CALL 
027410 CLR 
027400 027464 MOV 
027374 002262 MOV 

RESREG 

024446 CALL 
002604 2$: MOV 

002602 MOV 

RETURN 



<<MT0026 SETUP RANDOM DATA TEST>> 

MT0026 SETUP RANDOM DATA TEST 
****************************************************** tttttttttttt 

»26,REALPAT 

PCBUMP : TRAPS DO NOT ADD TO THE PC 

SEE0L0.R3 {INITIALIZE RANDOM NUMBERS 

SEE0HI.R2 
R3.R5 
R2.R4 
OFIRST.Rl 
#SIZE/2.R0 
OS.PROTYP 
1* 

#3.PR0TYP 
3* 

#7. BANK 
3$ 

»14000.R0 
#177. BANK 
7$ 

#14000. RO 



DO WE HAVE AN 11/83 ? 
BRANCH IF UE DO 
11/24? 

BRANCH IF SO 



#MTPA26*4,MTPD26*14 
#MTPA26.SUPD0A00 

SUPD03 
RANOOO 

#MTPB26*4.MTPD26*14 
#MTPB26.SUPD0ADD 

SUPD03 
2i 

#177, BANK 
4« 

#14000. RO 

#MTPA26*4.MTP026*14 

«MTPA26.SUP00A00 

SUPD03 

RANOOO 

#MTPB26*4.MTPD26*14 
#MTPB26,3UP00A0D 

SUPD03 

R3,SEEDL0 

R2.SEEDHI 



J FOR ERROR REPORTING 
;SET UP NEXT LINK 



;FOR ERROR REPORTING 
sSET UP NEXT LINK 



; UPDATE FOR NEW RANDOM NUMBERS 



CVMJAAO nSVll-J MEMORY DIAG. 
HT0026 SETUP RANDOM DATA TEST 

7516 021610 



7517 








7518 








7519 


021610 


012737 


000027 


7520 


021616 


104502 




7521 


021620 


012737 


024446 


7522 


021626 








021626 


012737 




7523 021634 








021634 


012737 


AAAAA 1 

000001 




021642 






7524 


021642 








021642 


005037 


AA'9 f A'9 

002102 




021646 






7525 


021646 


004 10 1 


A4 AAC9 

040U52 


7526 


021652 








021652 


005 Hi 


AA31 l£ 

0U2110 




021656 


A A \ Ate 

001436 






021660 


005 1 O 1 


AAOI 

002124 




021664 


AA< All 

001033 




7527 


021666 


104511 




7528 


021670 








021670 


013702 


002102 


7529 


021674 


Al 37 AA 
Ulc 'OU 




7530 


021700 


Al AAAA 




7531 


021702 


A« 37A1 
01c 'Ol 




7532 021706 


At Al Al 

010103 




7533 021710 








021710 








021716 


001005 




7534 


021720 


Ulc r o r 




7535 021726 


004777 


160570 


7536 


021732 
021732 






7537 


021732 




AAo«e3 
UUc43e 




021732 


023 idi 




021 7" 0 


AA1 AAC 

001005 




7538 


021 Vh2 


A1 07T7 

012 f 3 f 


02 f » Ic 


7539 021750 


AAil 7^7 

00*» ' 3 f 


Uc44«»0 


7540 


021754 
021754 






7541 


021754 
021754 






7542 


021754 








021754 


005217 


002102 




021760 


023737 


002102 




021766 


003727 






021770 






7543 


021770 








021770 


005237 


002452 




021774 


023727 


002452 




022002 


003717 






022004 






7544 


022004 
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SEQ 0202 

MT0027: SUBTST <<MT0027 UNIQUE BANK TEST>> 

; ******************************************************************************* 

:*SUBTEST MT0027 UNIQUE BANK TEST 

• ******************************************************************************* 

.•MAKE SURE THAT EACH BANK CAN HAVE UNIQUE DATA 

iURITE AND READ THE BANK NUMBER IN EACH BANK (EXCEPT WHERE THE PROGRAM IS) 
002300 MOV #27,REALPAT :SETUP PATTERN NUMBER FOR TYPEOUT £ DISPLAY 

CLRCSR ; CLEAR CSRS 

002522 MOV #SUPD03.LINK1 sSET UP LINK 

SET NOFSMODE 

002426 MOV «-l. NOFSMODE 

STAR27: FOR I :» #1 TO #2 
002452 "OV #1.1 

B24::::::i 

FOR BANK := *0 TO LASTBANK 

CLR BANK 
B25: :::::: 

CALL EXBANK 

IF ACFLAG IS TRUE AND RRFLAG IS FALSE 

TST ACFLAG 
BEQ L171 
TST RRFLAG 
BNE L171 

INVALIDATE {INVALIDATE BACKGROUND PATTERN ON "BANK" 

LET R2 := BANK 

MOV BANK,R2 

MOV OFIRST.RO 
MOV R0.R4 
MOV OSIZE.Rl 
MOV R1.R3 
IF I EQ #1 

000001 CMP I.ffl 

BNE L172 

002262 MOV »MTP034.SUPD0A0D 

CALL SLINKl 
END jOF IF 

L172:i;:i:: 

IF I EQ »2 

000002 CMP 1,02 

BNE L173 

002262 MOV #MTP034*6,SUPD0ADD 

CALL SUPD03 
END J OF IF 

L173:!:is!5 

END sOF IF 

L171:;5js;: 

END :0F FOR BANK 

INC BANK 

002556 CMP BANK, LASTBANK 

" BLE B25 

E25:::iii:; 

END ;0F FOR I ^ 
000002 CMP I . J2 

E24: 

IF FS7FLA6 IS TRUE 



116 



CvnJAAO nSVll- 


J MEMORY 


OIAG. 
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nT0027 UNIQUE 


BANK TEST 








022004 


005737 


002446 








AO')A1 A 

022010 


001403 










^CilC A11A11 

7545 022012 


005037 


002426 




CLR NOFSMODE 


754e 022016 


000207 






RETURN 




^Cil ^ AOOAOA 

7547 022020 








END :0F IF FS7FLAG 


022020 












7548 022020 








FOR I := n TO *2 


A'^^A^A 

022020 


012737 


000001 


002452 






A4 ^A4£ 

022026 












7549 022026 








FOR BANK := 


LAST6ANK DOUNTO 00 


A99AO£ 

OeeOcO 


013737 


002556 


002102 






0<:<:0 54 












'550 0i:^054 


004737 


040052 




CALL EXBANK 


'551 \Jcc\>'*\j 










TQ TQIir AMD QQPI TQ 


Uec04U 


005737 


002116 








OecU44 


001436 










A9 OAA£ 

0<:£04d 


005737 


002124 










001033 










» JJi UiS^034 








LET R2 


= BANK 




013702 


002102 








^CCT A^OA^A 

'553 02<.060 


005102 






COM 


R2 


'554 u^;^;u6e 


012700 


060000 




MOV 


*FIRST.RO 


7CCC A99A££ 

'555 0eeU66 


010004 






MOV 


R0.R4 


'59D \)cc\Ji\) 


012701 


040000 




MOV 


OSIZE.Rl 


'55' \jcc\)i'* 


010103 






MOV 


R1.R3 


755o 0220 'D 








IF I EQ 


#1 


0220 'O 


023727 


002452 


A A A A A « 
000001 






AOO 1 AA 


001005 










7CC;A AOOlAt 

'557 UeelUo 


012737 


027704 


002262 


MOV 


#MTP034 , SUPDOADD 


7e£A A^^ 1 1 il 

'560 022114 


004777 


160402 




CALL 


3LINK1 


7561 022120 








END :0F 


IF 


A^^ 1 OA 

022120 












7562 022120 








IF I EQ 


«2 


AOO 1 

0221eO 


023727 


002452 


AAAAAO 

000002 






A331 3& 


001005 










7R^V A99im 

7563 QcclSQ 


012737 


027712 


002262 


MOV 


<»MTP034* 6. SUPDOADD 


'564 \lcel50 


004737 


024446 




CALL 


SUPD03 


7565 0eel42 








END ;0F 


IF 


022142 












7566 Occl^c 








END iOF IF 


A001 A O 

022142 












7K^7 A001A0 

'56' 022142 








END J OF FOR 


BANK 


AOO 1 A O 

022142 


005337 


002102 








AOO 1 A^ 

022146 


023727 


002102 


AAAAAA 

000000 






AOO 1 CA 

022154 


002327 










AOO 1 

022156 












7CiLft A331CiL 
'560 Uccl56 








END sOF FOR I 




AOO 1 

022156 


005237 


002452 








AOO 1 ^O 

022162 


023727 


002452 


A AAA AO 

U00002 






n33i 7rt 
ucei 'u 


003716 










022172 












7569 022172 


005037 


002426 




CLR NOFSMODE 


7570 022176 


000207 






RETURN 





SEQ 0203 



TST FS7FLAG 
BEQ L174 



L174: : 

MOV »1.I 

B26::::::: 

MOV LASTBANK.BANK 
B27:::si:i 



TST ACFLAG 
BEQ L175 
TST RRFLAG 
BNE L175 



MOV BANK.R2 



CMP I. 01 
BNE LI 76 



L176:::i::: 

CMP 1.02 
BNE LI 77 

L177:jjs;!{ 
L175::::si: 

DEC BANK 
CMP BANK,«0 
BGE B27 
E27: ::::::: 

INC I 
CMP 1.02 
BLE B26 
E26: ::::::: 



CVMJAAO MSVll J MEMORY DIAG. 
MT0027 UNIQUE BANK TEST 

7573 022200 
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7574 022200 

7575 022204 
022P04 

7576 022212 
7b77 022220 

7578 022226 

7579 022234 

7580 022242 

7581 022244 
022244 
022252 

7582 022260 
022260 
022264 

7583 022264 

7584 022270 
022270 
022274 

7585 022276 
022276 
022302 
022304 
022310 

7586 022312 

7587 022316 

7588 022322 

7589 022326 
022326 

7590 022326 
022326 

7591 022326 
022326 
022332 
022340 
022342 

7592 022342 
022342 
022346 

7593 022350 
022350 

7594 022356 

7595 022360 

7596 022364 
022364 

"•597 022366 

7598 022370 
022370 
022374 
022400 

7599 022404 

7600 022406 
022406 

7601 022406 



005037 002264 



012737 
012737 
012737 
012737 
012737 
104470 

012737 
012737 

005037 

004737 

005737 
001414 

005737 
001411 
005737 
001006 
012701 
012700 
004777 



005237 
023737 
003751 



005737 
001032 

012737 
104502 
004737 

103010 

005037 
005037 
005037 
000207 



mm 

000030 
000001 
024446 
027466 



mm 
mm 

002102 
040052 
002120 

002116 

002124 

040000 
060000 
160174 



002102 
002102 



002264 

mm 

036402 



002426 
002440 
002542 



SEQ 0204 



002076 
002522 
002262 



002426 
002440 



002556 



002264 



MT0030: SUBTST <<MT0030 SETUP FLUSH OUT DBE'S TEST>> 

************************************************************* t ***************** 

♦SUBTEST MT0030 SETUP FLUSH OUT DBE'S TEST 

*******************************************************************^^tt ******** 



CLR 
SET 

002542 

002300 MTA030: MOV 



MOV 
MOV 
MOV 
ECCDIS 
SET 



PASFLG 
FULLREL 

«0.REALPAT 
Sl.NOPAR 
#SUP003,LINK1 
#MTP030.SUP00ADD 



MOV 0-1. FULLREL 
; SETUP PATTERN NUMBER FOR TYPEOUT £ DISPLAY 
; INDICATE COUNT PARITY ERRORS 



N0FSM0DE,N0SC0PE 
FOR BANK := #0 TO LA5TBANK 



CALL EXBANK 

IF MKFLAG IS TRUE 



! DISABLE ERROR CORRECTION 



B30: 



MOV #-l,NOFSMODE 
MOV #-l.NOSCOPE 

CLR BANK 



IF ACFLAG IS TRUE AND RRFLAG IS FALSE 

MOV #SIZE.R1 
MOV OFIRST.RO 
CALL 5ILINK1 

END iOF IF ACFLAG 

END :0F IF MKFLAG 

END ;0F FOR 

IF PASFLG IS FALSE 



TST MKFLAG 
BEQ L200 

TST ACFLAG 
BEQ L201 
TST RRFLAG 
BNE L201 



L201 :;:.-:!; 
L200:::;::: 

INC BANK 

CMP BANK.LASTBANK 
BLE B30 
E30::::::;i 

TST PASFLG 
BNE L202 

MOV 0-1. PASFLG 



013737 002310 002102 



SET PASFLG 

CLRCSR : CLEAR CSRS 

CALL RELOCATE 
ON. ERROR 

BCC L203 

ECCINIT iTRAP ON DOUBLE BIT ERRORS (NORMAL) 

CLEAR NOFSMODE.NOSCOPE, FULLREL 

CLR NOFSMODE 
CLR NOSCOPE 
CLR FULLREL 

RETURN 
END ;0F ON. ERROR 

L203 

MOV NEUBANK.BANK 
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SEQ 0205 



760? 
7603 
7604 
7605 
7606 
7607 

7608 
7609 



7610 



022414 
022420 
022424 
022426 
022432 
022434 
022434 
022434 
022436 
022436 
022442 
022446 
022452 



004737 
004737 
104472 
004737 
000207 



104472 

005037 
005037 
005037 
000207 



040052 

022212 

037214 



002426 
002440 
002542 



;TRAP ON DOUBLE BIT ERRORS (NORMAL) 



CALL EXBANK 
CALL MTA030 
ECCINIT 

CALL UNRELOCATE 
RETURN 
END ;0F IF PASFLG 

L202: 

ECCINIT J TRAP ON DOUBLE BIT ERRORS (NORMAL) 

CLEAR NOFSMODE.NOSCOPE.FULLREL 



RETURN 



CLR 
CLR 
CLR 



NOFSMODE 

NOSCOPE 

FULLREL 
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SEQ 0206 



7613 022454 



7614 022454 


004737 


024234 






CALL 


KAMITEST 


7615 022460 










CN. ERROR THEN $ RETURN 


022460 


103001 












022462 


000207 












022464 














7616 022464 










SET 


NOSCOPE 


022464 


012737 


• 177777 


002440 








7617 022472 


012737 


000031 


002300 




MOV 


«31,REALPAT 


7616 022500 


005037 


002076 






CLR 


NOPAR 


7619 022504 










MAP 


BANK 


022504 


010346 












022506 


013703 


002102 






MOV 


BANK.R3 


022512 


004737 


035716 






CALL 
.OSABL 


MAPPER 
CRF 


022516 


012603 












7620 022520 










TESTAREA 


022520 


053737 


002552 


177776 




BIS 
.OSABL 


TESTMODE.PSU 
CRF 


7621 022526 










BMOV 


MTP031. FIRST. SOBLEN 


022526 


004537 


041024 






JSR R5,BL0CI<3 


022532 


000027 








SOBLENGTH/2 


022534 


060000 








FIRST , 


022536 


027476 








MTP031 

.OSABL CRF 


7622 022540 


104417 








KERNEL 




7623 022542 


013702 


002572 






MOV 


S0BK.R2 


7624 022546 


010200 








MOV 


R2.R0 > 


7625 022550 


012701 


100776 






MOV 


0100776, Rl 


7626 022554 


012705 


060056 






MOV 


:«FIRST«S0BLENGTH,R5 


7627 022560 


012737 


060002 


002262 




MOV 


«FIRST«2.SUPD0ADD 


7626 022566 


012737 


160000 


002522 




MOV 


«LAST«2,LINK1 


7629 022574 


005737 


002456 






TST 


NOSUPER ' , 


7630 022600 


001005 








BNE 


1} ' 


7631 022602 


023737 


172252 


172254 




CMP 


SIPAR5.SIPAR6 


7632 022610 


001405 








BEQ 


2i • - 


7633 022612 


000407 








BR 


3* 


7634 022614 


023737 


177652 


177654 


11: 


CMP ~ 


UIPAR5.UIPAR6 


7635 022622 


001003 








BNE 


3i 


7636 022624 


012737 


140000 


002522 


21: 


MOV 


0140000. LINKl 


7637 022632 


004737 


024462 




3»: 


CALL 


SUPD04 ' 


7638 022636 


005037 


002440 






CLR 


NOSCOPE 


7639 022642 


000207 








RETURN 





MT0031: SUBTST «MT0031 SETUP SOB-A-LONG TEST» 

s*SUBTEST MT0031 SETUP SOB-A-LONG TEST 

{CHECK FOR KAMIKAZE MODE 
:IF NOT IN KAMIKAZE MODE RETURN 

BCC L204 
RTS PC 
L204:i:iiii 

MOV 0-1. NOSCOPE 
SETUP PATTERN NUMBER FOR TYPEOUT £ DISPLAY 
SETUP PARITY ACTION 
MAP FIRST SO BLOCK MOVE UORKS 

MOV R3.-CSP) 



MOV CSP}*.R3 

: ENTER TEST MODE 

:G0 TO SYSTEM TEST MODE 



i ENTER KERNEL MODE 



; COMPLEMENT OF INSTRUCTION "SOB RO.DOT" 
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SEQ 0207 



7642 


022644 








7643 


022644 


004737 


024234 




7644 


022650 










022650 


103001 








022652 


000207 








022654 








764S 


022654 










0^2654 


012737 


177777 


002440 


7646 


022662 


012737 


000032 


002300 


7647 


022670 


005037 


002076 




7648 


022674 










022674 


010346 








022676 


013703 


002102 






022702 


004737 


035716 






022706 


012603 






7649 022710 


012700 


010247 




7650 


022714 


012701 


177667 




7651 


022720 


012702 


020000 




7652 


022724 


010237 


002522 




7653 


022730 


012703 


060000 




7654 


022734 


012704 


160000 




7655 


022740 


005037 


002524 




7656 


022744 


005737 


002456 




7657 


022750 


001005 






7658 


022752 


023737 


172252 


172254 


7659 


022760 


001405 






7660 


022762 


000415 






7661 


022764 


023737 


177652 


177654 


7662 


022772 


001011 






7663 


022774 


012704 


140000 




7664 


023000 


012702 


014000 




7665 


023004 


010237 


002522 




7666 


023010 


012737 


000001 


002524 


7667 










7668 


023016 










023016 


053737 


002552 


177776 



MT0032: SUBTST <<MT0032 
:*******«********************* 
; •SUBTEST MT0032 SETUP 

• ***************************** 

CALL ^ KAMITEST 
ON.ERRtoR THEN $RETURN 



2$: 
3$: 



SET 


NOSCOPE 


MOV 


«32,REALPAT 


CLR 


NOPAR 


HAP 


BANK 


MOV 


BANK,R3 


CALL 


MAPPER 


.OSABL 


CRF 


MOV 


#10247. RO 


MOV 


#177667. Rl 


MOV 


«IZE/2.R2 


MOV 


R2.LINK1 


MOV 


#FIRST.R3 


MOV 


#LAST»2,R4 


CLR 


LINK2 


TST 


NOSUPER 


BNE 


1$ 


CMP 


SIPAR5.SIPAR6 


BEQ 


2$ 


BR 


3« 


CMP 


UIPAR5.UIPAR6 


BNE 


31 


MOV 


«140000.R4 


MOV 


#14000. R2 


MOV 


R2.LINK1 


MOV 


01.LINK2 



SETUP WRITE RECOVERY TEST>> 
************************************************** 

WRITE RECOVERY TEST 

********************'***************************** 

: CHECK FOR KAMIKAZE MODE 
ilF NOT IN KAMIKAZE MODE RETURN 

BCC L20S 
RTS PC 
L20S:::i::t 

MOV #-1. NOSCOPE 
SETUP PATTERN NUMBER FOR TYPEOUT £ DISPLAY 
SETUP PARITY ACTION 

MAP FIRST SO THAT THE BLOCK MOVE WORKS 

MOV R3,-(SP) 



MOV (SP)».R3 
OP CODE OF INSTRUCTION "MOV R2. -(PO- 
OP CODE OF COMPLEMENT OF INSTRUCTION "JMP (RO)' 
USED FOR 1/2 BANK LOOP 



TESTAREA 

BIS TESTMODE.PSW 
.DSABL CRF 



; ENTER TEST MOHE 

;G0 TO jYSTEM TEST MODE 



7669 










:M0VE TEST TO MEMORY UNDER 


7670 


023024 


010023 




4$: 


MOV 


R0,(R3)* 


7671 


023026 


010144 






MOV 


R1.-(R4) 


7672 


023030 


077203 






SOB 


R2.4$ 


7673 














7674 


023032 


022737 


000005 


004010 


CMP 


#5,PR0TYP 


7675 


023040 


001003 






BNE 


5* 


7676 










iMOVE LAST PART OF TEST TO 


7677 


023042 








BMOV 


MTP032 




023042 


004537 


040770 






JSR R5.BL0CK1 




023046 


027554 








MTP032 

.OSABL CRF 


7678 023050 


104417 




5$: 


KERNEL 


7679 














7680 


023052 


012702 


005141 




MOV 


#5141. R2 


7681 


023056 


012700 


023156 




MOV 


#10$. RO 



; ENTER KERNEL MODE 

sOP CODE OF INSTRUCTION "COM 
: ADDRESS TO RETURN TO IN RO 



(Rl) 



Bl 
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SEQ C 



7682 


023062 


012701 


160000 






nov 


•LAST«2.R1 


7683 


023066 


012737 


060000 


002262 




nov 


OFIRST.SUPDOADD 


7684 


023074 


005737 


002524 






TST 


LINK2 


7685 


023100 


001402 








BEQ 


6< 


7686 


023102 


012701 


140000 






MOV 


«140000.R1 


7687 


023106 


004737 


024462 




6$: 


CALL 


SUPD04 


7688 


023112 


012703 


020000 






MOV 


«SIZE/2,R3 


7689 


023116 


012705 


000110 






MOV 


«110.RS 


7690 


023122 


012704 


060000 






MOV 


•FIRST, R4 


7691 


023126 


005737 


002524 






TST 


LINK2 


7692 


023132 


001402 








BEQ 


It 


7693 


023134 


012703 


014000 






MOV 


«14000.R3 


7694 


023140 


012737 


027554 


002262 


7$: 


MOV 


0MTP032.SUP00A00 


7695 


023146 


004737 


024462 






CALL 


SUP004 


7696 


023152 


005037 


002440 




9$: 


CLR 


NOSCOPE 


7697 


023156 


000207 






10$: 


RETURN 





:T0P OF BANK 



7698 
7699 



iTHIS RETURN ACTS AS A NORMAL RETURN FROM MT0032 
;ALS0 A RETURN FROM THE "CALL SUPD04" ABOVE 



CI 
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SEQ 0209 



7702 


023160 








MT003i: 


SUBTST 


<<MT0033 SETUP BRANCH GOBBLE TEST>> 
























! ♦SUBTEST 


MT0033 SETUP BRANCH GOBBLE TEST 














7703 


023160 


004737 


024234 






CALL 


KAMITEST : CHECK FOR KAMIKAZE MODE 


7704 


023164 










ON. ERROR THEN JRETURN :IF NOT IN KAMIKAZE MODE RETURN 




023164 


103001 














023166 


000207 










RTS PC 




023170 












L206 


7705 


023170 










SET 


NOSCOPE 




023170 


012737 


177777 


002440 






MOV 0-1. NOSCOPE 


7706 


023176 


012737 


000033 


002300 




MOV 


#33.REALPAT j SETUP PATTERN NUMBER FOR TYPEOUT £ DISPLAY 


7707 


023204 


005037 


002076 






CLR 


NOPAR i SETUP PARITY ACTION 


7708 


023210 










MAP 


BANK ;MAP FIRST SO THAT BLOCK MOVE UORKS 




023210 


010346 










MOV R3.-(SP) 




023212 


013703 


002102 






MOV 


BANK,R3 




023216 


004737 


035716 






CALL 


MAPPER 














.DSABL 


CRF 




023222 


012603 










MOV (SP)».R3 


7709 














7710 


023224 










TEST AREA : ENTER TEST MODE 




023224 


053737 


002552 


177776 




BIS 


TESTMODE.PSW ;60 TO SYSTEM TEST MODE 














.DSABL 


CRF 


7711 


023232 










BMOV 


MTP033 . FIRST , GBLENGTH/2 




023232 


004537 


041024 






JSR 


R5.BL0CK3 




023236 


000037 








GBLENGTH/2 




023240 


060000 








FIRST 




023242 


027606 








MTP033 














.DSABL CRF 


7712 


023244 


104417 








KERNEL 


; ENTER KERNEL MODE 


7713 
















7714 


023246 


012705 


060076 






MOV 


#FIRST»GBLENGTH.R5 


7715 


023252 


012737 


060004 


002262 




MOV 


,'>FIRST*4,SUPD0ADD 


7716 


023260 


012701 


060002 






MOV 


#FIRST*2.R1 


7717 


023264 


012702 


060003 






MOV 


«FIRST*3,R2 


7718 


023270 


012737 


160000 


002522 




MOV 


#LAST*2.LINK1 


7719 


023276 


005737 


002456 






TST 


NOSUPER 


7720 


023302 


001005 








BNE 


1* 


7721 


023304 


023737 


172252 


172254 




CMP 


SIPAR5,SIPAR6 


7722 


023312 


001405 








BEQ 


2i 


7723 


023314 


000407 








BR 


3$ 


7724 


023316 


023737 


177652 


177654 


1*: 


CMP 


UIPAR5,UIPAR6 


7725 


023324 


001003 








BNE 


3$ 


7726 


023326 


012737 


140000 


002522 


2$: 


MOV 


#140000, LINKl 


7727 
















7728 


023334 


004737 


024462 




3*: 


CALL 


SUPD04 


7729 


023340 


005037 


002440 






CLR 


NOSCOPE 


7730 


023344 


000207 








RETURN 




7731 
















7732 


023346 








MT0034: 


SUBTST 


<<MT0034 SOFT ERROR - BACKGROUND PATTERN TEST>> 



7733 023346 012737 000034 002300 

7734 023354 012700 060000 

7735 023360 012701 040000 

7736 023364 013702 002620 



******************************************************************************* 

♦SUBTEST MT0034 SOFT ERROR - BACKGROUND PATTERN TEST 

******************************************************************************* 

MOV 034.REALPAT 
MOV #FIRST.RO 
MOV #SIZE.R1 
MOV S0FTPP'.R2 



Dl 
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SEQ 0210 



7737 
7738 
7739 
7740 



7741 
7742 
7743 
7744 



7745 
7746 
7747 
774S 
7749 

7750 
7751 
7752 



023370 
023372 
023376 
023400 
023400 
023406 

023410 
023416 
023422 
023422 
023424 

023424 
023432 
023436 
023444 
023444 
023444 

023446 



010103 
013705 
010004 

032765 
001406 

012737 
004737 

000410 



012737 
004737 
052765 



000207 



002104 



020000 002666 



027712 002262 
024446 



027704 002262 
024446 

020000 002666 



MOV R1.R3 

MOV BANKIN0EX.R5 

MOV R0.R4 

IF #BIT13 SET. IN C0NFIG«2(R5) 



: BACKGROUND PATTERN IS VALID 
MOV »MTP034*6.SUPOOADD 
CALL SUP003 :REA0 IT 

ELSE 



i BACKGROUND PATTERN HAS BEEN INVALIDATED 
MOV <»MTP034.SUPD0ADD 
CALL SUPD03 

BIS «BIT13.C0NFIG*2(R5) {VALIDATE IT 
END ;0F IF #BIT13 

RETURN 



BIT •eiT13.CQNFIG»2(R5) 
BEQ L207 



BR L210 
L207:::s:i: 



L210: 



MT0035: SUBTST <<MT0035 SETUP WORST CASE NOISE PARITY TEST>> 

:*SUBTEST MT0035 SETUP WORST CASE NOISE PARITY TEST 



7753 023446 


012737 


000035 


002300 


MOV 


*35,REALPAT 


;SET UP TEST NUMBER FOR DISPLAY 


7754 023454 


013703 


002104 




MOV 


BANKINDEX,R3 




7755 023460 


016301 


002664 




MOV 


C0NFIG(R3).R1 




7756 023464 


000301 






SWAB 


Rl 




7757 023466 


042701 


177760 




BIC 


«tC17.Rl 




7758 023472 


006301 






ASL 


Rl 




7759 023474 


010137 


002152 




MOV 


Rl.CSRNO 




7760 023500 


023737 


002152 


002532 


CMP 


CSRNO.PGMCSR 




7761 023506 


001001 






BNE 


1* 




7762 023510 


000207 






RETURN 






7763 023512 


012702 


052524 


1$: 


MOV 


#52524. R2 




7764 023516 


004737 


032630 




CALL 


BACKGNO 


i WRITE BACKROUND OF ALMOST ALT. I'S 


7765 023522 


012737 


027730 


002262 


MOV 


SMTP035.SUPD0ADD 




7766 023530 


004737 


024446 




CALL 


SUP003 




7767 023534 








IF QVFLAG IS TRUE THEN $RETURN 




023534 


005737 


002346 








TST QVFLAG 


023540 


001401 










BEQ L211 


023542 


000207 










RTS PC 


023544 














7768 023544 


005102 






COM 


R2 




7769 023546 


004737 


032630 




CALL 


BACKGND 


; WRITE COMPLEMENT PATTERN INTO MUT 


7770 023552 


004737 


024462 




CALL 


SUPD04 




7771 023556 


000207 






RETURN 







AND O'S 



El 
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SEQ 0211 



7773 023560 



7774 

7775 
7776 
7777 
7778 
7779 
7780 
7781 
7782 



023560 
023566 
023572 
023576 
023600 
023604 
023610 
023614 
023620 



012737 
004737 
005037 
005000 
012701 
004737 
004737 
004737 
000207 



000036 
032674 
002264 

lOOCOO 
037740 
030072 
040026 



002300 



MT0036: SUBTST <<MT0036 SETUP CORRECTION CODE TEST>> 

: ************************************************** ********************^*^ttt** 

.♦SUBTEST MT0036 SETUP CORRECTION CODE TEST 

f ******************************************************************************* 



MOV 
CALL 
CLR 
CLR 
MOV 
CALL 
CALL 
CALL 
RETURN 



036.REALPAT 

GETCSR 
PASFLG 
RO 

#100000. Rl 
MAPKERNAL 
MTP036 
UNMAP 



SET UP TEST NUMBER FOR TYPEOUT AND DISPLAY 
GET CSR INFO FROM CONFIG TABLE 
CLEAR LOOP COUNTER 
GET TEST DATA 
GET FIRST ADDRESS IN BANK 
MAP KIPAR5 AND 6 TO BANK 
EXECUTE TEST 
REMAP KERNAL SPACE 



Fl 
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SEQ 0212 



7784 023622 



7785 
7786 
7787 
7788 
7789 
7790 
7791 
7792 



023622 
023630 
023634 
023636 
023642 
023646 
023652 
023656 



012737 
012701 
005000 
004737 
004737 
004737 
004737 
000207 



000037 
100000 

037740 
032674 
030316 
040026 



002300 



MT0037: SUBTST <<MT0037 SETUP ECC DISABLE TEST>> 

:*SUeTE5T MT0037 SETUP ECC DISABLE TEST 



MOV 
MOV 
CLR 
CALL 
CALL 
CALL 
CALL 
RETURN 



«7,REALPAT 
«1 00000. Rl 
RO 

MAPKERNAL 
GETCSR 
MTP037 
UNMAP 



SETUP PATTERN AND NUMBER FOR TYPEOUT AND DISPLAY 

SET UP TEST ADDRESS 

CLEAR DATA TO BE URITTEN 

MAP THIS TEST TO KERNEL SPACE 

GET CSRINFQ FROM CONFIG TABLE 

CHECK ECC DISABLE 

REMAP KERNEL SPACE 



CVMJAAO MSVll-J MEMORY DIAG. 
MT0O37 SETUP ECC DISABLE TEST 



Gl 
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SEQ 0^13 





023660 








7795 


023660 


A1 ^7T7 
012 fS 7 


AAAAil 1 
000041 


AAOT AA 
002300 


7796 


023666 


004737 


032674 






023672 












A 1 ^7T7 

012737 


ATAT7A 

030370 


002262 


/ lyO 


AOTTArt 

veifW 










A3T7rtA 
Oci fW 








/ r99 


\Jc3 '0*» 










A3T7AA 




AAOI AO 


AAA1 77 




KJci 1 Ic 


AA1 AAA 






fO\}\} 












A3'T7 1 A 


rtl 37^7 


AAAA1 A 


AA3C7A 
























023724 








7802 


023724 










023724 


012737 


000020 


002570 


7803 


023732 










023732 








7804 


023732 


004737 


024446 




7805 


023736 


000207 







MT0041: SUBTST <<MT0041 SETUP 

{♦SUBTEST MT0041 SETUP ADDRESS 

i ************************************ 

MOV #41,REALPAT 

CALL GETCSR 

LET SUPDOADD :« #MTP041 

LET Rl := #FIRST 

IF BANK EQ #177 

LET PASCNT := #12. 
ELSE 

LET PASCNT :- #16. 



END 

CALL SUPD03 
RETURN 



ADDRESS TO CSR ON DOUBLE BIT ERROR TEST>> 
******************************** t**m**t**** 

TO CSR ON DOUBLE BIT ERROR TEST 

SETUP PATTERN AND NUMBER FOR TYPEOUT AND DISPLAY 
GET CSR NUMBER AND ADDRESS FROM CONFIGURATION TABLE 
SET UP TEST ADDRESS 

MOV #MTP041. SUPDOADD 



;SET UP FIRST ADDRESS 
:ARE UE AT BANK 177? 



L212: 



MOV #FIRST,R1 

CMP BANK. #177 
BNE L212 

MOV #12.. PASCNT 

BR L213 



MOV #16.. PASCNT 



L213 

s EXECUTE ADDDRESS TO ' CSR* TEST IN SUPVISIOR MODE 



HI 
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MT0041 SETUP ADDRESS TO CSR ON DOUBLE BIT ERROR TEST 



SEQ 0214 



7807 023740 



7808 023740 

7809 023746 

7810 023752 

7811 023756 

7812 023762 

7813 023766 

7814 023772 



012737 
012701 
004737 
004737 
004737 
004737 
000207 



000042 
100000 
037740 
032674 
030542 
040026 



002300 



MT0042: SUBTST <<MT0042 SETUP EXTENDED Q BUS ADDRESS TO CSR TEST>> 

; ♦SUBTEST MT0042 SETUP EXTENDED Q-BUS ADDRESS TO CSR TEST 

; ******************************************************************************* 



MOV 
MOV 
CALL 
CALL 
CALL 
CALL 
RETURN 



*42.REALPAT 
*100000.R1 
MAPKERNAL 
GETCSR 
MTP042 
UNMAP 



SETUP PATTERN AND NUMBER FOR TYPEOUT AND DISPLAY 
SET UP TEST ADDRESS 
MAP TO KERNEL SPACE 

SET UP CSRINFO FROM CONFIGURATION TABLE 
CHECK EXTENDED Q-BUS ADDRESS TO CSR 
REMAP KERNEL SPACE 



11 



CVMJAAO MSVll-J MEMORY 01 AG. 
MT0042 SETUP EXTENOEO Q-BUS 

7316 023774 



7817 023774 

7818 024002 

7819 024006 
024006 

7820 024012 

7821 024016 

7822 024022 

7823 024024 



012737 
004737 

012701 
004737 
004737 
000207 



000043 
037740 

100000 
031030 
,040026 
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ADDRESS TO CSR TEST 

MT0043: SUBTST <<MT0043 SETUP WRITE BYTE CLEARS SBE TEST>> 

it**************************************************************** ft* f ******* 

J ♦SUBTEST MT0043 SETUP WRITE BYTE CLEARS SBE TEST 

; ******************************************************************************* 



SEQ 0215 



002300 



MOV 
CALL 
LET Rl 



»43,REALPAT 
MAPKERNAL 
:« #100000 



SET UP TEST NUMBER FOR TYPEOUT AND DISPLAY 
MAP TO KERNEL SPACE 
SET UP TEST ADDRESS 

MOV »1 00000. Rl 

: PERFORM WRITE BYTE TEST 
i REMAP KERNEL SPACE 



7824 


024024 


012737 


000044 


002300 


7825 


024032 


004737 


032674 




7826 


024036 










024036 


012737 


031224 


002262 


7827 


024044 










024044 


012701 


060000 




7828 


024050 










024050 


023727 


002102 


000177 




024056 


001004 






7829 


024060 










024060 


012737 


120000 


002562 


7830 


024066 










024066 


000403 








024070 








7831 


024070 










024070 


012737 


160000 


002562 


7832 


024076 










024076 








7833 


024076 


004737 


024446 




7834 


024102 


000207 






7835 


024104 









CALL MTP043 
CALL UNMAP 
RETURN 

MT0044: SUBTST <<MT0044 SETUP SHIFTING 1/0' S THROUGH THE CHECK BITS TEST>> 

; ******************************************************************************* 

;*SUBTEST MT0044 SETUP SHIFTING 1/0' S THROUGH THE CHECK BITS TEST 

j ***************************************** ^ ************************************* 



MOV #44,REALPAT 
CALL GETCSR 
LET SUPDOAOD := #MTP044 

LET Rl := #FIRST 

IF BANK EQ *177 



SET UP TEST NUMBER FOR TYPEOUT AND DISPLAY 
GET CSR NUMBER AND ADDRESS FROM CONFIGURATION TABLE 



SET UP TEST ADDRESS 
:SET UP FIRST ADDRESS 
iARE WE AT BANK 177? 



LET ENOAOD 



#120000 



ELSE 



7836 
7837 
7838 

7839 
7840 
7841 
7842 



7843 
7844 
7845 

7846 
7847 
■'848 



024104 
024112 
024116 
024116 
024122 
024126 
024132 
024134 



024134 
024142 
024146 
024146 
024152 
024156 
024162 



012737 
004737 

012701 
004737 
004737 
000207 



012737 
004737 

012701 
004737 
004737 
000207 



000045 002300 
037740 

100000 
031546 
040026 



000046 002300 
037740 

100000 
031734 
040026 



LET ENDAOO := #160000 



END 

CALL SUPD03 
RETURN 

MT0045: SUBTST <<MT0045 

;**************************** 

! ♦SUBTEST MT0045 SETUP 

■ **************************** 

MOV #45.REALPAT 
CALL MAPKERNAL 
LET Rl := #100000 

CALL MTP045 
CALL UNMAP 
RETURN 

MT0046: SUBTST <<MT0046 

; **************************** 

! ♦SUBTEST MT0046 SETUP 

; **************************** 

MOV #46.REALPAT 
CALL MAPKERNAL 
LET Rl := #100000 

CALL MTP046 
CALL UNMAP 
RETURN 



L214: 



MOV »MTP044,SUPD0ADD 

MOV #FIRST.R1 

CMP BANK. #177 
BNE L214 

MOV #120000. ENDADD 
BR L215 



: t 



IL 



:slL 



MOV #160000, ENDADD 
L215:i::;;; 

i EXECUTE AODDRESS TO CSR TEST IN SUPVISIOR MODE 



SETUP SYNDROMES TO CSR ON DOUBLE BIT ERR0R>> 
*************************************************** 

SYNDROMES TO CSR ON DOUBLE BIT ERROR 
*************************************************** 

SET UP TEST NUMBER FOR TYPEOUT AND DISPLAY 
MAP TO KERNEL SPACE 
SET UP TEST ADDRESS 

MOV #100000. Rl 
PERFORM SYNDROMES TO CSR ON DOUBLE BIT ERROR 
REMAP KERNEL SPACE 

SETUP CHECK SINGLE BIT ERRORS WITH ECC DISABLED TET>> 
*************************************************** 

CHECK SINGLE BIT ERRORS WITH ECC DISABLED TET 
*************************************************** 

SET UP TEST NUMBER FOR TYPEOUT AND DISPLAY 
MAP TO KERNEL SPACE 
SET UP TEST ADDRESS 

MOV #100000. Rl 
; PERFORM TRAPS OECTECTEO ON SBE WITH ECC DISABLED TE 
i REMAP KERNEL SPACE 



Jl 
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MT0046 SETUP CHECK SINGLE BIT ERRORS WITH ECC DISABLED TET 



SEQ 0216 



7849 


024164 






7850 


024164 


012737 


000047 


7851 


024172 


004737 


037740 


7852 


024176 








024176 


012701 


100000 


7853 


024202 








024202 


012702 


120000 


7854 


024206 


004737 


032274 


7855 


024212 


004737 


040026 


7856 


024216 


000207 





002300 



MT0047: SUBTST <<MT0047 SETUP NO CSR UPDATE ON SBE WITH EXSISTING OBE TEST>> 

; ******************************************************************************* 

; ♦SUBTEST MT0047 SETUP NO CSR UPDATE ON SBE WITH EXSISTING DBE TEST 

; ******************************************************************************* 



MOV 
CALL 
LET Rl 

LET R2 



#47.REALPAT 
MAPKERNAL 
:= *100000 



#120000 



CALL MTP047 
CALL UNMAP 
RETURN 



iSET UP TEST NUMBER FOR TYPEOUT AND DISPLAY 
;MAP TO KERNEL SPACE 
J SET UP TEST ADDRESS 

MOV #100000. Rl 
; " " SECOND TEST ADDRESS 

MOV #120000, R2 
! PERFORM NO UPDATE TO CSR ON SBE WITH DBE 
; REMAP KERNEL SPACE 



CVMJAAO riSVll-J MEMORY 01 AG. 
MT0047 SETUP NO CSR UPOATE ON 

7859 024220 



7860 024220 

7861 024224 
024224 

786^ 024232 
7863 

7864 024234 



7865 024234 
024234 
024240 
024242 
024246 
024250 
024254 
024256 

7866 024256 
024256 
024260 

7867 024262 
024262 
024264 

7868 024264 
024264 
024266 

7869 024270 
024270 



005037 002300 



012737 
000207 



000261 
000207 



177777 



005737 002006 
001006 

005737 002350 
001003 

005737 002352 
001403 



000241 
000207 

000402 



Kl 
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SBE UITH EXSISTING OfiE TEST 

MT0999: SUBTST <<MT0999 SETUP NULL TEST>> 

: ******************************************************************************* 

i ♦SUBTEST MT0999 SETUP NULL TES"^ 

• ******************************************************************************* 

CLR REALPAT 
SET NULLFLAG 

002344 MOV #-1. NULLFLAG 

RETURN 

KAMITEST: SUBTST <<CHECK FOR KAMIKAZE M00E>> 

■ ******************************************************************************* 

i*SUBTEST CHECK FOR KAMIKAZE MODE 

i ******************************************************************************* 

IF KAMIKAZE IS TRUE OR ACTFLAG IS TRUE OR APTFLAG IS TRUE 

TST KAMIKAZE 
BNE L216 
TST ACTFLAG 
BNE L216 
TST APTFLAG 
BEQ L217 

L216: 

♦RETURN NOERROR ;RUN THE TEST 

CLC 

RTS PC 

ELSE 

BR L220 

L217: ; ; ; J ; ; 

♦RETURN ERROR ;D0N'T RUN THE TEST 

SEC 

RTS PC 

END jOF IF KAMIKAZE 

L220: 



SEQ 0217 



CtfMjAAO MSVll-J MEMORY OIAG. 
CHECK FOR KAMIKAZE MODE 

7872 024270 



LI 
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SEQ 0218 



7873 024270 
024270 
024272 
024276 



7874 
7875 



7876 
7877 
7878 
7879 
7880 
7881 
7882 
7883 
7884 
7885 
7886 
7887 
7888 
7889 
7890 
7891 
7892 
7893 
7894 
7895 



7896 
7897 
7898 
7899 
7900 
7901 
7902 



7903 



024302 
024304 
024310 
024310 
024314 
024320 
024324 
024330 
024332 
024334 
024336 
024340 
024342 
024344 
024350 
024356 
024364 
024370 
024372 
024374 
024376 
024400 
024402 
024404 
024406 
024406 

024414 
024420 
024422 
024426 
024430 
024432 
024434 
024434 
024440 
024444 



010346 

013703 002102 
004737 035716 



012603 
004737 

013746 
013746 
010037 
012700 
010120 
010220 
010320 
010420 
010520 
010620 
013700 
012737 
013737 
012700 
014006 
014005 
014004 
014003 
014002 
014001 
014000 

052737 

012706 
104424 
004737 
104423 
104417 
000004 

012637 
012637 
000207 



SUPDOl: SUBTST <<SUBR EXECUTE 

■0000************************** 

; ♦SUBTEST SUBR EXECUTE 

: ****************************** 
MAP BANK 

MOV BANK,R3 
CALL MAPPER 
.OSABL CRF 



PATTERN IN SUPERVISOR >> 
************************************************* 

PATTERN IN SUPERVISOR 
************************************************* 

:MAP SUPERVISOR SPACE (TEST AREA) TO BANK 

MOV R3,-(SP) 



051430 

002624 
002622 
002160 
002162 



002160 
024364 
002622 
002176 



002622 
002624 



SUPD02: CALL 
PUSH 



MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 

TAG4$: MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 



040000 
000740 
177640 



002622 
002624 



177776 



SUPERVISOR 



GETDIS 

$LPERR.*LPADR 



RO.SUPDRO 

*SUPDR1.R0 

R1.(R0)» 

R2.(R0)» 

R3.(R0)» 

R4.(R0)» 

R5.(R0)* 

SP.(RO)* 

SUPDRO.RO 

«TAG4$,$LPADR 

$LPADR.$LPERR 

»SUPDR6*2.R0 

-(RO).SP 

-(R0).R5 

-(R0).R4 

-(R0),R3 

-(R0),R2 

-(R0),R1 

■(RO).RO 



MOV (SP)».R3 



MOV $LPERR.-(SP) 
MOV »LPADR. (SP) 



BIS 
. DSABL 
MOV 

CACHOFF 

CALL 

CACHON 

KERNEL 

SCOPE 

POP 



RETURN 



#BIT14.PSU 
CRF 

OSUPSTK.SSP 
FASTCITY 



$LPADR.$LPERR 



; ENTER SUPERVISOR MODE 

;G0 TO SUPERVISOR MODE 



(TURN CACHE OFF 

sCALL TO THE USER INSTRUCTION PAR'S 
J TURN CACHE ON 
i ENTER KERNEL MODE 



MOV (SP)*.$LPADR 
MOV (SP)».*LPERR 



Ml 
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SUBR EXECUTE PATTERN IN SUPERVISOR 



7906 


024446 








0^4446 


01034© 






024450 


All 7AT 

013703 


AAO 1 AO 
00£lO£ 




024454 


AAA 717 
004 ' 3 ' 


AT57 1 

035 'lt> 




0e44o0 


A 1 ot^nt 
01eD03 




7907 


0«44o« 


004 ' 3 ' 


OC 1 ATO 


'908 


0«44OO 








A9AA&& 
0«44OO 


U13 r40 






A9dA79 
Oe44 f ^ 


m X74A 




f 909 


A3AA7& 
0£44 f O 


A1 AAV 7 


009 1 AO 


'910 


0£t3Ue 


Ulc fUU 


AA91 A9 


'911 


O*** jOO 


Ai Al OA 




fylc 


Uctjlv 


01 0990 




f 91 3 




01 0T90 




'91* 




01 0430 




701 K 

'913 


Oc^JlO 


01 0S90 




701 <^ 
' 910 




ft 1 0A90 




7Q1 7 
f 91 ' 




01 "^700 
\JXO 1 \J\J 


0091 AO 


(910 




Ol 37'X7 


094*i49 


701 O 
'919 


r)94^'<4 




00?AP? 


'9eU 


n94^4d 


01 ?700 




7921 


024546 


014006 




7922 


024550 


014005 




7Q3X 
'9c J 


r)94^^? 

UcH33c 


01 4004 




703A 
'9c«» 


n34^<!4 


01 400'^ 




7oa^ 

ItCJ 




01 400? 




' 9eO 




01 4001 




7037 
f 9« ' 




01 4000 
V A "WWW 




7091t 

r9e0 


n94^<>4 








n34<^A4 


OS'^7'^7 


00P55P 


7090 


n94l(79 


005737 


002456 


f 93U 


vC'^J f O 


001403 




7011 
'931 




01 P70fc 


000700 


70 V 3 
'9oe 


Ue40U* 


000409 




'933 




01 P76ft 
l/lc 'vv 


000740 


7QX4 




104424 




7935 


024614 


004777 


155442 


7936 


024620 


104423 




7937 


024622 


104417 




7938 


024624 


000004 




7939 


024626 








024626 


012637 


002622 




024632 


012637 


002624 


7940 


024636 


000207 







MAP 


BANK 




MOV 


RANK R3 




TALL 


MAPPER 




DSABL 


CRF 






GFTDIS 




PUSH 


iLPERR i LP ADR 




nov 


DO SUPDRO 




MOV 


ACMPORl.RO 




MOV 


Rl (RO)* 




MOV 


R2.(R0]* 




MOV 


R3.(R0)* 




MOV 


R4.(R03* 




MOV 


R5 (RO)* 




MOV 


SP (RO)* 




MOV 


SUPDRO , RO 




MOV 


<>TBG4$ . $LPADR 




MOV 


$LPADR, ^LPERR 


TBG4$ : 


MOV 


«SUPDR6*2,R0 




MOV 


-(RO),SP 




h*OV 


-(R0),R5 




MOV 


-(R0),R4 




MOV 


-(R0).R3 




MOV 


-(R0).R2 




MOV 


-(RO).Rl 




MOV 


-(RO).RO 




TESTAREA 




BIS 


TESTMODE.PSW 




.DSABL 


CRF 




TST 


NOSUPER 




BEQ 


U 




MOV 


OUSESTK.USP 




BR 


2* 


1^: 


MOV 


ftSUPSTK.SSP 


2i: 


CACHOFF 






CALL 


9SUPD0ADD 




CACHON 






KERNEL 






SCOPE 






POP 


JLPAOR.JLPERR 



RETURN 



:MAP SUPERVISOR SPACE (TESl AREA) TO BANK 

MOV R3.-(SP) 



MOV (SP)«,R3 



MOV *LPERR. (SP) 
MOV »LPAOR.-(SP) 



J ENTER SUPERVISOR MODE 

5 GO TO SYSTEM TEST MODE 



sTURN CACHE OFF 

jTURN CACHE ON 

: ENTER KERNEL MODE 



MOV (SP)*.«LPADR 
MOV (SP)«,*LPERR 



CVMJAAO MSVll-J MerKWY DIAG. 
MEMORY TEST PATTERN ROUTINES 

7943 
7944 

7945 
7946 
7947 
7948 
7949 
7950 
7951 
7952 

7953 024640 



Nl 
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SEQ 0220 



7954 
7955 
7956 
7957 
7958 
7959 
7960 
7961 
7962 
7963 
7964 



024640 
024642 
024644 
024646 
024650 
024652 
024654 
024656 
024660 
024662 
024664 



7965 024664 

7966 024666 

7967 024672 
7966 024674 

7969 024676 

7970 024700 

7971 024702 

7972 024704 

7973 024706 

7974 024712 

7975 024714 

7976 024716 



010220 
077102 
000240 
012401 
020102 
001402 
104430 
000240 
077306 
000207 



010220 

062702 000002 

077104 

000240 

012400 

020005 

001401 

104427 

062705 000002 

077307 

000207 



•SBTTL MEttORY TEST PATTERN ROUTINES 

PATTERN REGISTER CONVENTIONS 

RO FIRST ADDRESS OF PATTERN (FIRST ,LAST*2, ETC) 

Rl NUMBER OF ADDRESSES IN PATTERN (SIZE) 

R2 DATA FOR PATTERN ( ONES . 52525 . ETC ) 

R3 COPY OF Rl (IF NECESSARY) 

R4 COPY OF RO (IF NECESSARY) 

R5 COPY OF R2 (IF NECESSARY) 

******************************************************************************* 
HTPOOO: SUBTST <<MTPOOO BASIC DATA TEST>> 

******************************************************************************* 
♦SUBTEST MTPOOO BASIC DATA TEST 

******************************************************************************* 



II 



MOV 
SOB 
NOP 
MOV 
CMP 
BEQ 
PERR02 
NOP 
SOB 

RETURN 
MTPOOl: SUBTST 



V177640 
V177642 
V177644 
V177646 
V177650 
V177652 
V177654 
V177656 
V177660 
V177662 
ADDRESS TE5T>> 

! ♦SUBTEST MTPOOl ADDRESS TEST 



21 



3$ 



R2.(R0)« 
Rl, MTPOOO 

(R4)«,R1 

R1.R2 

3$ 



R3.2« 

<< MTPOOl 



3$ 



V177640 
V177642 
V177646 
V177650 
V177652 
V177654 
V177656 
V177660 
V177662 
V177666 
V177672 

COMPLEMENT ADDRESS TEST (WRITE DOWN. READ UP)>> 
{♦SUBTEST MTP002 COMPLEMENT ADDRESS TEST (URITE OOUN, READ UP) 



1$: 



2$: 



MTP002! 



MOV 
ADD 
SOB 
NOP 
MOV 
CMP 
BEQ 
PERROl 
ADD 
SOB 

RETURN 
SUBTST 



R2.(R0)* 
«2.R2 
R1.3* 

(R4)*.R0 

R0.R5 

2i 

#2.R5 
R3.1* 

<<MTP002 



7977 024716 


010540 




3$: 


MOV 


R5.-(R0) JV177640 


7978 024720 


062705 


000002 




ADO 


«2.R5 


;V177642 


7979 024724 


077104 






SOB 


R1.3t 


[V177646 


7980 024726 


000240 






NOP 




V177650 


7981 024750 


162702 


000002 


It: 


SUB 


#2,R2 


,V177652 


7982 024734 


012401 






MOV 


(R4)*.R1 


V177656 


7983 024736 


020102 






CMP 


R1.R2 


V177660 


7984 024740 


001401 






BEQ 


2* 


V177662 


7985 024742 


104430 






PERR02 




V177664 


7986 024744 


077307 




2*: 


SOB 


R3.1* 


V177666 


7987 024746 


000207 






RETURN 




V177670 



B2 
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M7P002 COMPLEMENT ADDRESS TEST (WRITE DOUN. READ l/) 



SEQ 0221 



7990 024750 



7991 
7992 
7993 
7994 
7995 
7996 
7997 
7998 
7999 
SOOO 

aool 

S002 
S003 
8004 
8005 
8006 
8007 
8008 
8009 
8010 
8011 
8012 
8013 



MTPA03: SUBTST <<MTPA03 3 XOR 9 WORST CASE NOISE TEST (WRITE )>> 

******************************************************************************* 



•SUBTEST 



MTPA03 3 XOR 9 WORST CASE NOISE TEST (WRITE) 



Rl « ADDRESS 
R2 • SMALL LOOP CONSTANT 
R3 - NUri or ADD TO TEST (LARGE LOOP) 
R4 > GOOD DATA 
R5 ' MEDIUM LOOP CONSTANT 



024750 
024751 
024754 
024756 
024760 
024762 
024764 
024770 
024772 
024774 
024776 
025000 
025004 
025006 



025010 



010421 
010421 
077203 
005104 
052704 
000401 

012702 000004 

077511 

005104 

052704 

000401 

012705 000100 

077317 

000207 



.ENABL 


LSB 




MOV 


R4.(R1)* 


V177640 


MOV 


R4.(R1)* 


V177642 


SOB 


R2.lt 


V177644 


COM 


R4 


V177646 


BIS 


(PC)».R4 


V177650 


401 




V177652 


MOV 


#4.R2 


V177654 


SOB 


R5.1$ 


V177660 


COM 


R4 


V177662 


BIS 


(PC)*.R4 


V177664 


401 




V177666 


MOV 


«64. ,R5 


V177670 


SOB 


R3.1* 


V177674 


RETURN 


V177676 


.DSABL 


LSB 




SUBTST 


<<MTPB03 3 XOR 9 



ir 



UARN2: 



UARN3: 



MTPB03: 

: **************************************************************************** ft 

:*SUBTEST MTPB03 3 XOR 9 WORST CASE NOISE TEST (READ) 











8014 








.ENABL 


LSB 




8015 025010 


000137 


025050 


1»: 


JMP 


S#MTPC03 


V177640 GO TO V172360 


8016 025014 


077203 






SOB 


R2.1$ 


V177644 


8017 025016 


005104 






COM 


R4 


V177646 


8018 025020 


052704 






BIS 


(PC)*.R4 


V177650 


8019 025022 


000401 




WARN4: 


401 




V177652 WARNING LOCATION IS MODIFIED BEFORE LOADING 


8020 025024 


012702 


000004 




MOV 


#4.R2 


V177654 


8021 025030 


077511 






SOB 


R5.1$ 


V177660 


8022 025032 


005104 






COM 


R4 


V177662 


8023 025034 


052704 






BIS 


(PC)».R4 


V177664 


8024 025036 


000401 




WARNS : 


401 




V177666 WARNING LOCATION IS MODIFIED BEFORE LOADING 


8025 025040 


012705 


000100 




MOV 


#64. ,R5 


V177670 


8026 025044 


077317 






SOB 


R3.1* 


V177674 


8027 025046 


000207 






RETURN 




V177676 


8028 








.OSABL 


LSB 





C2 



CVMJAAO MSVil 
nTPB03 3 XOH 



J MEMORY OIAG. MACRO VOS.Olb Friday 15 Feb 85 16:10 Page 242 
9 WORST CASE NOISE TEST (READ) 



SEQ 0222 



8031 


025050 






8032 


025050 


020421 




8033 


025052 


001401 




8034 


025054 


104431 




8035 


025056 


005141 




8036 


025060 


005111 




8037 


025062 


000137 


025066 


8038 








8039 


025066 






8040 


025066 


020421 




8041 


025070 


001401 




8042 


025072 


104431 




8043 


025074 


005127 




8044 


025076 


000000 




8045 


025100 


001363 




8046 


025102 


000137 


025014 



MTPC03: SUBTST 
;*SUBTEST 

CMP 

BEQ 
PERR03 
II: COM 
COM 
JMP 

MTPD03: SUBTST 

• ************** 

{♦SUBTEST 

: ************** 

CMP 
BEQ 
PERR03 
1$: COM 
0 

BNE 
JMP 



<<MTPC03 TEST DATA SUBPROGRAM >> 

***************************************************************** 

MTPC03 TEST DATA SUBPROGRAM 
***************************************************************** 



R4.(R1)» 
1$ 

-(Rl) 
(Rl) 

90MTP003 



V172360 
V172362 
V172364 
V172366 
V172370 
V172372 



GO TO V172260 



<<MTPD03 TEST DATA SUBSUBPROGRAM> > 

***************************************************************** 

MTP003 TEST DATA SUBSUBPROGRAM 
***************************************************************** 



R4.(R1)« 

1* 

(PC)» 

MTPC03 
9»MTPB03*4 



V172260 

V172270 
V172272 
V172274 



GO TO V172360 
GO TO V177644 



D2 
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MTP003 TEST DATA SUBSUBPROGRAM 



SEQ 0223 



0049 02S106 



8050 
8051 
8052 
8053 
6054 
6055 
6C56 
8057 
8058 
8059 
8060 
8061 
8062 



8063 
8064 
8065 
8066 
8067 
8068 
8069 
8070 
8071 



025106 
025112 
025114 
025116 
025122 
025126 
025130 
025132 
025134 
025136 
025140 

025142 



025142 
025144 
025146 
025150 
025152 
025154 
025156 

025162 



8072 
8073 
8074 
8075 
8076 
8077 
8078 
8079 
8080 
8081 
8082 



025162 
025166 
025170 
025172 
025176 
025202 
025204 
025206 
025210 
025212 
025214 



012705 000010 

010504 

000241 

000137 025142 

016004 177776 

103402 

020204 

001401 

104432 

077115 

000207 



106110 
077502 
106120 
106110 
077402 
106120 

000137 025122 



012705 000010 

010504 

000261 

000137 025142 

016004 177776 

103002 

020204 

001401 

104432 

077115 

000207 



MTPA04: SUBTST <<MTPA04 ROTATING ZEROS TeST>> 

******************************************************************************* 

♦SUBTEST MTPA04 ROTATING ZEROS TEST 

******************************************************************************* 



1$: 



2$: 
3$: 



MOV 

MOV 

CLC 

JMP 

MOV 

BCS 

CMP 

BEQ 

PERR04 

SOB 

RETURN 



«8..R5 
R5.R4 

S«MTPB04 

-2(R0).R4 

2* 

R2.R4 
3* 

Rl.lt 



V177640 
VI 77644 
V177646 
V177650 
V177654 
V177660 
V177662 
V177664 
V177666 
V177670 
V177672 



MTPB04: SUBTST <<MTPB04 SUBR ROTATING BIT>> 

i*SUBTEST MTPB04 SUBR ROTATING BIT 



ROLB 

SOB 

ROLB 

ROLB 

SOB 

ROLB 

JMP 



(RO) 
R5.U 
(RO)* 
(RO) 
R4,2« 
(RO)* 

9»MTPA04*14 



V172360 
V172362 
V172364 
V172366 
V172370 
V172372 
V172374 



MTP005: SUBTST <<MTP005 ROTATION ONES TEST>> 

: ♦SUBTEST MTP005 ROTATION ONES TEST 



1*; 



3»: 



MOV 
MOV 
SEC 
JMP 
MOV 
BCC 
CMP 
BEQ 
PERR04 
SOB 

RETURN 



#8. .R5 
R5.R4 

S«MTPB04 
2(R0}.R4 

2* 

R2.R4 
3* 

Rl.lt 



V177640 
V177644 
V177646 
V177650 
V177654 

V177660 IF THIS HAPPENS THE GOOD € BAD MATCH 

V177662 

V177664 

V177666 

V177670 

V177672 



CVMJAAO MSVll-J MEMORY DIA6. 
MTP005 ROTATION ONES TEST 
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8086 








8087 








8088 


025216 


012737 


000001 


8089 


025224 


005037 


002244 


8090 


025230 


013771 


002242 


8091 


025236 


013771 


002244 


8092 


025244 


017102 


000000 


8093 


025250 


023702 


002242 


8094 


025254 


001401 




8095 


025256 


104433 




8096 








8097 


025260 


017102 


000002 


8098 


025264 


023702 


002244 


8099 


025270 


001401 




8100 


025272 


104434 




8101 








8102 


025274 


005737 


002244 


8103 


025300 


100405 




8104 


025302 








025302 


006137 


002242 




025306 


006137 


002244 


8105 


025312 


000746 




8106 








8107 


025314 


012737 


lllllb 


8106 


025322 


012737 


177777 


8109 025330 


013771 


002242 


8110 


025336 


013771 


002244 


8111 


025344 


017102 


000000 


8112 


025350 


023702 


002242 


8113 


025354 


001401 




8114 


025356 


104433 




8115 








8116 


025360 


017102 


000002 


8117 


025364 


023702 


002244 


8118 


025370 


AA1 Artl 




8119 025372 


104434 




8120 








8121 


025374 


005737 


002244 


8122 


025400 


100005 




8123 


025402 








025402 


006137 


002242 




025406 


006137 


002244 


8124 


025412 


000746 




8125 


025414 


000207 





SEQ 0224 



002242 

000000 
000002 



MTP006: SUBTST <<MTP006 INITIAL DATA TEST>> 

8 •SUBTEST MTP006 INITIAL DATA TEST 

; THIS TEST CHECKS THE DI/DO LINES BY 

SHIFTING A 1 THROUGH THE WORD. 



002244 
000000 
000002 





MOV 


Sl.DATBUF 


SET THE FIRST TEST BIT 




CLR 


DATBUF*2 


CLEAR 2ND UORD 


1$ : 


nOV 


DATBUr , SQKl ) 


URITc 1 cb 1 UOKO 1 




MOV 


DATBUr ♦2,321 Rl J 


AND TEST WORD 2 




MOV 


9(K1 J,K2 






CHr 


n A TDI IC o ^ 


NOW KtMD iHtn 




BEQ 




DO TC CTDCT 1£ Hi/ 

BK Ir rlHoT 16 OK 




rtnHOf 




CDOnO TOAD 


ci : 


nov 








CHr 


DATBUr * 2, R2 


kiAi 1 ncAn cr^*AMA i mnn 

NOW READ SECOND UORD 






3? 


DO TC ni/ 

BR Ir OK 




rcKKlO 




CDOnO TOAD 


3» : 


TCT 


UM 1 bUr *d 


LJAC 1 ACT DTT DCCM TCCTCn 0 

HAb LHbl bl 1 BttN ItbltD 




DMT 


4* 


MINUS MEANS BIT 31 




ULtr 1 


DATBUF 


NO. SHIFT TEST BIT LEFT 




ROL 


DATBUF 






ROL 


DATBUF 4 2 






rtCADI 


CRF 






no 


1$ 


GO URITE NEU TEST DATA 








NOU GOING TO SHIFT A 0 IN DATA 


4*: 


MOV 


#177776, DATBUF 


PUT A 0 IN BIT 0 




MOV 


0-1. DATBUF 4 2 


AND I'S IN ALL OTHERS 


J* : 


nuv 


DATBUF. a(Rl) 


URITE THE DATA 




nuv 


DATBUF ♦2. a2(Rl) 


2 UORDS UORTH 




Mnu 
nuv 


9(R1).R2 






TMD 


DATBUF. R2 :NOU READ FIRST UORD 






6* ;BR IF OK 












MOV 


a2(Rl).R2 






CMP 


DATBUF* 2, R2 iNOU, READ SECOND UORD 




BEQ 


7$ :BR IF OK 




PERRIO 






7$: 


TST 


DATBUF 42 ! TESTED BIT 31 YET? 




BPL 


8* :BR IF YES. WE'RE DONE 




DLEFT 


DATBUF 






ROL 


DATBUF 






ROL 


DATBUF»2 






.DSABL 


CRF 






BR 


5$ iKEEP GOING 


S$: 


RETURN 







F2 



CVMJAAO MSVll J MEMORY DIAG. 
MTP006 INITIAL DATA TEST 

8128 025416 



8129 
8130 
8131 
8132 

8133 025416 

8134 025420 

8135 025422 

8136 025424 
8137 

8138 025426 

8139 025430 

8140 025432 

8141 025434 

8142 025436 
8143 

8144 025440 

8145 025442 

8146 025444 

8147 025446 

8148 025450 

8149 025452 

8150 025454 
8151 

8152 025456 

8153 025460 

8154 025462 

8155 025464 

8156 025466 
8157 

8158 025470 

8159 025474 

8160 025476 

8161 025502 

8162 025504 

8163 025506 

8164 025512 

8165 025514 
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MTP007: SUBTST <<MTP007 ADDRESS BIT TEST>> 

.»*♦«♦««««♦♦♦♦♦♦♦•*•*•♦•**♦**♦♦*•*•♦♦•♦•••♦♦*♦♦*♦♦♦••••••••••••♦♦••••••••♦♦••••♦ 

! ♦SUBTEST MTP007 ADDRESS BIT TEST 

• ******************************************************************************* 

; THIS TEST CHECKS TO SEE THAT EACH ADDRESS 

; BIT IN EACH 16K BANK CAN BE ASSERTED UNIQUELY. 

IT CHECKS FOR ADDRESS BITS THAT MAY BE STUCK 
HIGH. STUCK LOU OR STUCK TOGETHER. 



SEQ 0225 



111100 




MOVB 


(Rl).RO 




105700 




TSTB 


RO 


:REA0 AND COMPARE FOR ZEROS 


001401 




BEQ 


1$ 


:BR IF OK 


104435 




PERRll 






105111 


1$: 


COMB 


(Rl) 


: COMPLEMENT THE BYTE 


111100 




MOVB 


(Rl).RO 


:READ FOR NON ZEROS 


105700 




TSTB 


RO 


001001 




BNE 


2i 


:BR IF OK 


104436 




PERR12 






040201 


2i: 


BIC 


R2,R1 


sMASK OFF THE ASSERTED BIT 


006302 




ASL 


R2 


J SHIFT R2 FOR NEXT BIT 


050201 




BIS 


R2.R1 


:SET THE NEW BIT INTO Rl 


011100 




MOV 


(Rl).RO 




005700 




TST 


RO 


iREAD THE NEW ADDRESS 


001401 




BEQ 


3$ 


sREAD FOR ZEROS 


104437 




PERR13 






005111 


3*: 


COM 


CRD 


;COMPL THE WORD 


011100 




MOV 


(Rl).RO 




005700 




TST 


RO 


;READ IT AGAIN 


001001 




BNE 


4$ 




104440 




PERR14 






022702 100000 


4«: 


CMP 


fllOOOOO.RS 




001407 




BEQ 


5« 




022702 010000 




CMP 


ftl0000.R2 


; CHECK FOR MSB IN 4K BANK 


001356 




BNE 


2i 


:NOT LAST BIT. BRANCH 


006302 




ASL 


R2 




012701 160000 




MOV 


0160000. Rl 




000752 




BR 


2$ 




00C207 


5$: 


RETURN 







CVMJAAO MSVll-J MEMORY DIAG. 
MTP007 ADDRESS BIT TEST 

6168 025516 



8169 
8170 

8171 025516 010402 

8172 025520 010403 

8173 025522 062702 000004 

8174 025526 012713 177777 

8175 025532 012763 177777 

8176 025540 105013 

8177 02554,? 010401 
8176 025544 020201 
6179 025546 001420 

8180 025550 020301 

8181 025552 001007 

8182 025554 111100 
8183 

8184 025556 022700 000000 

8185 025562 001401 

8186 025564 104435 
8187 

8188 025566 005201 

8189 025570 000765 

8190 025572 111100 

8191 025574 122700 177777 

8192 025600 001401 

8193 025602 104436 
8194 

8195 025604 005201 

8196 025606 000756 

8197 025610 112713 177777 
8196 025614 005203 

8199 025616 020302 

8200 025620 001347 

8201 025622 000207 
6202 



G2 
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SEQ 0226 



MTPOlO: SUBTST <<MTP010 BYTE ADDRESSING TEST>> 

; ********************************************************* 

i*SUBTEST MTPOlO BYTE ADDRESSING TEST 

; ********************************************************* 

:TEST 3 l^'S TEST CHECKS FOR PROPER 

BYTE ADDRESSING UITH ECC DISABLED 
:R4 HAS LOUEST ADDRESS 



000002 



1$: 
2$: 



3«: 
4$: 

5*: 
bi: 



MOV 
MOV 
ADD 
MOV 
MOV 
CLRB 
MOV 
CMP 
BEQ 
CMP 
BNE 
MOVB 



R4.R2 
R4,R3 
#4,R2 
# l.(R3) 
*-1.2(R3) 
(R3) 
R4.R1 
R2.R1 
6i 

R3.R1 
41 

(Rl).RO 



PUT IT IN R3 ALSO 
POINT R2 TO LAST BYTE ♦I 
URITE ALL ONES IN 
THE 4 TEST BYTES 
CLEAR A BYTE 

INITIALIZE Rl FOR EACH PASS 
IF EQUAL, JUST READ LAST BYTE 
BR IF EQUAL 

IS THIS THE BYTE OF ZEROS 
BR IF NOT 



iUARNING IF YOU 
CMP #0.R0 
BEQ 3« 
PERRll 



INC 
BR 

MOVB 
CMPB 
BEQ 
PERR12 

INC 

BR 

MOVB 

INC 

CMP 

BNE 

RETURN 



Rl 
2* 

(RD.RO 

#-l.RO 

5* 



Rl 
2i 

0-1. (R3) 
R3 

R3.R2 



OPTOMIZE CHANGE THE PCBUMP FOR THIS ERROR INCASE OF TRAPS 
sIT IS. COMPARE FOR ZEROS 



;NEXT BYTE 
; RETURN 



.•ITS NOT THE BYTE OF O'S. READ I'S 



sMOVE TO NEXT BYTE 

RESTORE I'S TO BYTE JUST TESTED 
INC TO NEXT BYTE 
UAS THAT JUST THE LAST ONE? 
BR IF NO 



CVMJAAO MSVll-J MCMORY DIAG. 
MTPOlO BYTE ADDRESSING TEST 

8205 025624 



8206 
8207 
8208 
8209 
8210 
8211 
8212 



H2 
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SEQ 0227 



8213 

8214 

8215 
8216 

8217 
8218 

8219 

8220 
8221 



8222 
8223 

8224 
8225 
8226 



8227 
8228 

8229 
8230 

8231 
8232 
8233 

8234 
£235 
8236 
8237 

8238 
8239 

8240 



025624 

02S626 

025626 

025632 

025632 

025640 

025640 

025646 

025650 

025650 

025656 

025660 

025660 

025666 

025666 

025670 

025672 

025672 

025700 

025702 

025704 

025704 

025704 

025706 

025714 

025714 

025722 

025724 

025724 

025732 

025732 

025740 

025742 

025742 

025742 

025744 

025750 

025750 

025750 

025752 

025756 

025762 

025762 

025766 

025770 

W5770 

025776 

026000 



104424 

005037 

012737 

012737 
104513 

012737 
104425 

012737 

005011 
005711 

023727 
001401 
104055 



002072 
000001 
060000 

003145 

103145 



002076 
002034 

002150 

002044 



002072 000001 



104426 

042737 020000 002150 

023737 002150 002044 
001407 

012737 177777 002612 

013737 002150 002052 
104065 



104473 

005037 002266 



104473 

005237 002266 
005037 002072 

112711 000377 
105711 

023727 002072 000001 
001411 



MTP014: SUBTST <<MTP014 BASIC DOUBLE BIT ERROR TEST>> 

************************* 

♦SUBTEST MTP014 BA5IC DOUBLE BIT ERROR TEST 

******************************************************************************* 

THIS TEST CHECKS THAT A DOUBLE ERROR UILL BE DETECTED 
A BYTE URITE UITH A DOUBLE ERROR ON A MSVll-P 
UILL BE ABOTRED. 



CACHOFF 

LET PARCNT := #0 

LET NOPAR := #1 

LET ADDRESS := *FIRST 



CBREG 
LET CSR 



#3145 



LOAOCSR 

LET GOOD := 0103145 



LET (Rl) 



90 



TST (Rl) 

IF PARCNT NE #1 



ERROR +55 

END 

READCSR 

BIC »BIT13.CSR 

IF CSR NE GOOD THEN 



SET HEADER 
LET BAD :* CSR 
ERROR «65 

END 

ECCIINIT 
CLR PASSNO 
REPEAT 

ECCIINIT 
INC PASSNO 
CLR PARCNT 
LET (Rl) :B' 



#377 



TSTB (Rl) 

IF PARCNT NE #1 



SET HEADER 



CLR PARCNT 
MOV «1. NOPAR 



;TURN OFF CACHE 
! CLEAR PARCNT 

;SET PARITY ACTION 

;SET ADDRESS FOR ERROR REPORT 

MOV #FIRST. ADDRESS 
: ENABLE CHECK/SYNDROME BIT REGISTER 
:DBE CHECK BITS FOR CSR 

MOV #3145. CSR 

; URITE DBE CHECK BITS TO CSR 
•GOOD DATA 

MOV #103145. GOOD 
: URITE ZEROS AND DBL ERROR CHK BITS A=0 

CLR (Rl) 

:READ A=0 TO GET DOUBLE BIT ERROR 
:UAS BUSPBL ASSERTED???? 

CMP PARCNT, #1 
BEQ L221 

: ERROR CALL ;: MISSED EXPECTED TRAP 



I f » t • • 



L221: 

:READ CSR FOR CORRECT CHECK BItS AND DBE INDICATOR 
: CLEAR INHIBIT MODE POINTER FROM DATA IF IT EXSISTSl 
: CHECK IF DOUBLE ERROR BIT IS SET 

CMP CSR. GOOD 
BEQ L222 



iBAD DATA 



i ENABLE BUSPBL 

i CLEAR LOOP COUNTER 



MOV #-1. HEADER 
MOV CSR. BAD 



L222: 



B31: 



[ENABLE BUSPBL 
{INCREMENT LOOP COUNTER 
: CLEAR PARITY ACTION COUNTER 
: URITE BYTE SHOULD BE ABORTED 

{READ Rl TO SEE IF IT IS STILL 0 
iUAS URITE ABORTED??? 



MOVB #377, (Rl) 



CMP PARCNT, #1 
BEQ L223 



12 
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MTP014 BASIC DOUBLE BIT ERROR TEST 



026000 
S241 026006 
026006 

8242 026012 
026012 

8243 026020 

8244 026022 
026022 

8245 026022 

8246 026024 
026024 
026032 
026034 

8247 026034 

8248 026036 

8249 026040 

8250 026044 

8251 026046 
8252 



012737 

005037 

012737 
104056 

005201 

023727 
001346 

005041 
104503 
005037 
104423 
000207 



177777 
002044 
000377 



002612 



002052 



002266 000002 



002072 



END 



LET GOOD : 
LET BAD 
ERROR «56 



: »0 

«77 



INC Rl 
UNTIL PASSNO EQ «2 



CLR -(Rl) 
CLRICSR 

CLR PARCNT 

CACHON 

RETURN 



Page 252 1 

:G00D DATA 
:BAD DATA 

ff 
■ 

:AN0 REPEAT ON HIGH BYTE 



L223: 



E31: 

CLEAR LUT 
CLEAR CSR 

CLEAR PARITY TRAP COUNTER 
TURN ON CACHE 



SEQ 0228 



MOV HEADER 
CLR GOOD 
MOV 0377. BAD 



CMP PASSNO. 02 
BNE B31 



J2 
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MTP014 BASIC DOUBLE BIT ERROR TEST SEQ 0229 

8255 026050 MTP017- SUBTST <<MTP017 HOLDING I'S £ O'S TEST>> 

;*SUeTEST MTP017 HOLDING I'S £ 0' 5 TEST 



I *********************************************************** 



8256 






:♦(!) 


THIS TEST 


CHECKS THE MEMORY FOR THE CAPABILITY 


8257 






; * 


OF HOLDING 


IS AND O'S BY URITING A BACKGROUNT 


8258 






; * 


OF 000377 


AND READING IT 


8259 






i*(2) 


MEMORY IS 


URITTEN USING A BYTE AT A TIME 


8260 






:«(3) 


STEPS 1 L 


2 ARE REPEATED UITH A SUAPPED BACKGROUND PATTERN 


8261 






jNOTE: 


THIS TEST 


URITES BYTES C READS UORDS 


8262 026050 


012701 060000 




MOV 


OFIRST.Rl 




8263 026054 


010104 




MOV 


R1.R4 




8264 026056 


012705 160000 




MOV 


#LAST»2.R5 


8265 026062 


012700 000377 




MOV 


0377.ro 


sGET THE PATTERN INTO RO 


8266 026066 


010003 




MOV 


R0.R3 




8267 026070 


000303 




SUAB 


R3 




8266 026072 


110021 


1$: 


MOVB 


R0.(R1)» 


i WRITE A BYTE 


8269 026074 


110321 




M0V6 


R3.(R1)» 


i WRITE THE MEMORY UITH THE BYTE STORED IN BAKPAT*! 


8270 026076 


020105 




CMP 


R1.R5 


s COMPARE TEST LOC TO TOP ♦ 2 


8271 026100 


103774 




BLO 


1$ 


iBRANLM IF LOUER 


8272 












8273 026102 


014102 


2$: 


MOV 


-(R1),R2 




8274 026104 


020002 




CMP 


R0,R2 


;TEST THE MEMORY TO SEE IF IT CONTAINS 


8275 










:THE UORD STORED IN BAKPAT 


8276 026106 


001401 




BEQ 


3$ 




8277 026110 


104446 




PERR22 






8278 












8279 026112 


020104 


3$: 


CMP 


R1,R4 


;KEEP ON TESTIl > THE MEMORY UNTIL 


8280 026114 


101372 




BHI 


2$ 


;R1 EQUALS THE LOUEST ADDRESS 


8281 026116 


000303 




SUAB 


R3 


; CHANGE THE DAiA PATTERN 


8282 026120 


000300 




SUAB 


RO 




8283 026122 


001763 




BEQ 


li 


sIF THE DATA PATTERN DOES NOT HAVE LOU 


8284 










; BYTE *0 THEN FALL THRU 


8285 026124 


000207 




RETURN 






8267 













002264 
002264 

mm 

002324 
002264 

000001 



CVMJAAO MSVll-J MEHGRY DIAG, 
MTPOi? HOLDING rS £ O'S TEST 

6269 026126 



8290 
6291 
6292 
6293 
6294 

6295 026126 

6296 026130 

6297 026132 
6296 026136 

6299 026140 
026140 

6300 026140 
026140 

6301 026144 
026144 

6302 026150 
026150 

6303 026154 
026154 
026162 

6304 026164 
026164 

6305 026170 
026170 
026172 

8306 026172 
026172 
026176 
026176 

8308 026176 
026176 

8309 026176 

8310 026202 
026202 

8311 026204 
026204 

8312 026210 

6313 026214 

6314 026220 
026220 

6315 026224 

8316 026226 
026226 

8317 026230 

8318 026232 

8319 026234 

8320 026236 

8321 026244 
026244 
026252 

8322 026254 
026254 

8323 026262 



104424 
005000 
105037 
104513 



105237 

012704 

005037 

123727 
001003 

012705 

000402 



6307 



012705 177776 



005237 

005204 

116402 
072227 
052702 

010237 
104425 

010011 
104503 
005711 
104426 
042737 

023727 
001407 



002324 



030276 
000005 
000004 

002150 



177757 
002150 



l<2 
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MTP02C: SUBTST <<MTP020 SYNDROMES TO CSR ON SINGLE BIT ERROR TEST>> 

s*SUBTEST MTP020 SYNDROMES TO CSR ON SINGLE BIT ERROR TEST 

; ************************************************* ■f*************************t*'** 

THIS TEST CHECKS TO SEE IF THE SINGLE BIT ERRORS CAUSE THE SBE 
BIT IN THE CSR TO BE SET AND CORRECT SYNDROME BITS ARE GENERATED FOR 
ALL 16 DATA BITS. 



SEQ 0230 



000001 



002150 
000020 



CACHOFF 
CLR RO 
CLRB PASFLG 
CBREG 
REPEAT 

LET PASFLG :B- PASFLG 

LET R4 := #-1 

LET BITNO := #0 

IFB PASFLG EQ #1 



#1 



;= #177776 



LET R5 
ELSE 

LET R5 
END 

REPEAT 

INC BITNO 

LET R4 :» R4 ♦ n 

LET R2 :B= PTABLE(R4) 

ASH «5,R2 
BIS #BIT2,R2 
LET CSR := R2 



LOADCSR 
LET (Rl) 



RO 



CLRICSR 
TST (Rl) 
READCSR 
BIC #tC20.CSR 
IF CSR NE #20 



012737 000020 002044 



LET GOOD 
LET BAD 1 



«20 
CSR 



:TURN OFF CACHE 
: CLEAR DATA 
; CLEAR PASFLG 

i ENABLE CHECK/SYNDROME BIT REGISTER 



• I I I • • 



B32 • 

; INCREMENT LOOP COUNTER 

INCB PASFLG 
i INDEX TO SINGLE BIT ERROR TABLE 

MOV #-l,R4 
.•CLEAR INNER LOOP COUNTER 

CLR BITNO 

i SELECT DATA TO BE CORRECTED BY PASSNO 

CMPB PASFLG. 01 
BNE L225 

(DATA-.; BIT TO BE CORRECTED IS A ONE 

MOV #1.R5 

BR L226 

L225: 

;DATA=177776;BIT TO BE CORRECTED IS A ZERO 

MOV #177776. R5 



L226: 



B33: 

INCREMENT BIT POINTER 
: POINT TO NEXT SET OF CHECK BITS 

INC R4 

:GET NEXT SET OF CHECK BITS 

MOVB PTABLE(R4).R2 

; SHIFT TO LINE UP IN CSR 

{ENABLE DIAG MODE 

;GET CHECK BITS TO BE URITTEN 

MOV R2.CSR 

:LOAD CSR UITH DATA 

;URITE DATA TO TEST ADDRESS 

MOV RO.(Rl) 

: CLEAR CSR 
; CORRECT SBE 

:READ CSR FOR CORRECT SBE BIT AND SYNDROMES 
: CLEAR ALL BUT SBE INDICATOR 
;UAS DATA CORRECTED??? 

CMP CSR. #20 
BEQ L227 

MOV #20. GOOD 



L2 
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SEQ 0231 



026262 

8324 026270 

8325 026272 
026272 

8326 026272 

8327 026274 

8328 026276 

8329 026304 
026304 

8330 026310 

8331 026314 

8332 026320 
026320 
026324 

8333 026326 
026326 

8334 026334 
026334 

8335 026340 
026340 

8336 026346 

8337 026350 
026350 

8338 026350 

8339 026352 
026352 
026360 

8340 026362 

8341 026364 
026364 
026366 

8342 026366 

8343 026370 

8344 026372 
026372 

8345 026372 
026372 
026400 
026402 

8346 026402 

8347 026404 
026404 
026412 
026414 

8348 026414 

8349 026416 

8350 026420 
8351 

8352 
8353 



013737 
104060 



104514 
104426 
042737 

116403 
072327 
052703 

020337 
001411 

012737 

010337 

013737 
104042 

005011 

123722 
001002 
006305 

000402 

000261 
006105 



023727 
001276 

005100 

123727 
001252 

104503 
104423 

000207 



002150 002052 



174033 002150 



026422 
000005 
000004 

002150 



177777 
002044 
002150 



002612 



002052 



002264 000001 



002324 000020 



002264 000002 



8354 026422 


016 


013 


023 


026425 


025 


026 


031 


026430 


032 


034 


043 


026433 


045 


046 


051 


026436 


052 


054 


061 


026441 


064 







ERROR •60 

END 

SYNREG 
READCSR 

BIC #tC3744.CSR 

LET R3 :B- SBESYN(R4) 

ASH «.R3 
BIS #BIT2.R3 
IF R3 NE CSR 



SET HEADER 
LET GOOD R3 
LET BAD := CSR 
ERROR ^42 

END 

CLR (Rl) 

IFB PASFL6 EQ «1 



ASL 
ELSE 



SEC 
ROL 



R5 



R5 



END 

UNTIL BITNO EQ #16. 



COM RO 
UNTILB PASFLG EQ *2 



CLRICSR 

CACHON 

RETURN 



:N0 ERROR 



MOV CSR. BAD 



L227:5;;;!j 
s ENABLE SYNDROME BIT REGISTER 
:GET SYNDROMES FROM CSR 
jMASK SYNDROME BITS 
:GET GOOD SYNDROMES 

MOVB SBESYN(R4).R3 

: SHIFT INTO POSITION 
;SET DIAG MODE IN DATA 
iOO SYNDROME BITS AGREE 

CMP R3.CSR 
BEQ L230 

MOV «-l. HEADER 

MOV R3.6000 

MOV CSR. BAD 



L230:::i::: 

! CLEAR LUT 

: SHIFT NEW DATA DEPENDING ON PASFLG 

CMPB PASFLG. »1 
BNE L231 

; SHIFT BITNO TO THE LEFT 

BR L232 
L231 ::::::: 

sSET CARRY BIT AND 

.•ROTATE LEFT 

L232: ;;!;:; 
! UNTIL ALL BITS ARE DONE 

CMP BITNO, #16. 
BNE B33 

! COMPLEMENT DATA AND* REPEAT 
:UNTIL 2 PASSES ARE COMPLETE! 

CMPB PASFLG. 02 
BNE D32 
E32::::;:s 

: CLEAR CSR 
:TURN CACHE 



MSVll-f> SINGLE BIT ERROR SYNDROME BIT TABLE 
SBESYN: .BYTE 16.13.23.25.26.31,32.34.43.45.46.51.52.54.61.64 



8355 



M2 



CvnjAAO nSVll-J nenORr OIAG. macro VOS.Olb Friday 15 Feb-85 16:10 Page 257 
MTP020 SYNOROnES TO CSR ON SINGLE BIT ERROR TEST 



SEQ 0232 



8357 


026442 






8358 








8359 


026442 


014100 




8360 


026444 


020200 




8361 


026446 


001401 




8362 026450 


104443 




0363 








8364 


026452 


000511 




0365 


026454 


A1 1 1 A A 
011100 




0300 


Ue045D 


AOATAA 

OcOoOO 




036 ' 




AA 4 il A 4 

001401 




o3eo 




1 Ail AAA 

104 




Body 








03 iQ 




020401 




B) '1 




001365 




03 rc 




AAAOA7 

U0020 f 




'^373 








6374 


026472 






8375 


026472 


A1 1 1 AA 




8376 


026474 


AOATAA 




8377 


026476 


AA1 AA1 




8378 


026500 


1 /\AAAA 

10**'»* 




8379 








8380 


026502 


AAAT 1 1 




8381 


026504 


A1 1 1 AA 




8382 


026506 


AOAOAA 




8383 


026510 


AA1 A(\t 




8384 


026512 






8385 








8386 


026514 




AAAAAO 


8387 


026520 






8388 026522 


AA1 T&T 
001 30 3 




8389 026524 






8390 








8391 


026526 






8392 


026526 


A 1 1 1 AA 

011100 




8393 


026530 


AOAOAA 

OeOeOO 




8394 


026532 


AA 1 A A 1 
001401 




8395 


026534 


1 tiAAAX 




8396 








8397 


026536 


AAAV 1 1 
000311 




8398 


026540 


A 1 1 1 AA 
011100 




8399 


026542 


AOAt AA 

Oc03UU 




8400 


026544 






8401 


026546 


104444 




8402 








8403 


026550 


062701 


000002 


8404 


026554 


020501 




8405 026556 


001363 




8406 


026560 


000207 





HTPA21: SUBTST <<mPA21 HARCHING I'S 6 O'S PATTERN TEST>> 

: •SUBTEST MTPA21 MARCHING I'S C O'S PATTERN TEST 

: READ . BYTESUAP-nOOIF Y . READ , OOUN 



2i. 



MTPB21 : 



2%: 



3«: 



MTPC21 ; 
1$: 



2«: 



3$; 



MOV 
CMP 
BEQ 
PERR17 

SUAB 

MOV 

CMP 

BEQ 

PERR20 

CMP 
BNE 

RETURN 



(RD.RO 
R2.R0 
2$ 



(Rl) 
(RD.RO 
R3.R0 
3( 



R4.R1 
1$ 



V177640 
V177642 
V177644 
V177646 

V177650 
V177652 
V177654 
V177656 
V177660 

V177662 
V177664 
V177666 



: READ , BYTESUAP-MODIFY . READ . UP 



MOV 
CMP 
BEQ 

PERR20 

SUAB 

MOV 

CMP 

BEQ 

PERR17 

ADD 
CMP 
BNE 

RETURN 



(RD.RO 
R3,R0 
2% 



(RD 
(RD.RO 
R2.R0 
3$ 



#2.R1 
RS.Rl 



VI 77640 
V177642 
V177644 
V177646 

V177650 
V177652 
V177654 
V177656 
V177660 

V177662 
V177666 
V177670 
V177672 



! READ . BYTESWAP-MODIF Y . READ . UP 



MOV 
CMP 
BEQ 
PERR17 

SUAB 
MOV 
CMP 
BEQ 

PERR20 



(RD.RO 
R2,R0 
2% 



(RD 
(RD.RO 
R3.R0 
3* 



ADD #2.R1 

CMP RS.Rl 

BNE U 
RETURN 



V177640 
V177642 
V177644 
V177646 

V177650 
V177652 
V177654 
V177656 
V177660 

V177662 
VI 77666 
V177670 
V177672 



DONE? 

NO - LOOP 

YES - RETURN 



DONE? 

NO - LOOP 

YES - RETURN 



DONE? 

NO - LOOP 

YES - RETURN 



N2 



CVMJAW MSVll-J MEMORY OIAG. MACRO VOS.Olb Friday 15-Feb-85 16:10 P»oe 259 
MTPA21 MARCHING I'S £ O'S PATTERN TEST 



SEQ 0233 



6409 
8410 
8411 
8412 
8413 
8414 
8415 
8416 
8417 
8418 
8419 
8420 
8421 
8422 
8423 
8424 



026562 
026562 
026':64 
026566 
026570 

026572 
026r74 
026S76 
026600 
026602 

026604 
026606 
026610 



014100 
020300 
001401 
104444 

000311 
011100 
020200 
001401 
104443 

020401 
001365 
000207 



MTP021 : 
1«: 



2$: 



3$: 



; RE AO . B YTESUAP - MODIFY . READ . DOUN 



nuv 


-(Rl).RO 


,V177640 


CMP 


R3.R0 


V177642 


dEO 


2i 


V177644 






V177646 




(Rl) SV177650 


MOV 


(Rl).RO {V177652 


CMP 


R2,R0 SV177654 


BEQ 


3$ ;V177656 


PERR17 


;V177660 


CMP 


R4.R1 


V177662 


BNE 


1$ 


V177664 


RETURN 




VI 77666 



DONE? 

NO - LOOP 

YES - RETURN 



b: 



cvnjAAo risvii-j nenoRY 

nTPA21 MARCHING I'S 6 
8427 026612 



6428 
6429 
8430 
8431 

6432 000010 

8433 026612 
026612 012737 
026620 

8434 026620 
026620 023727 
026626 001005 

6435 026630 
026630 013702 

6436 026634 
026634 013703 

8437 026640 
026640 000404 
026642 

8438 026642 
026642 013702 

8439 026646 
026646 013703 

8440 026652 
026652 

8441 026652 
026652 
026656 

8442 
8443 

8444 026656 104423 

8445 026660 
026660 013737 

8446 026666 
026666 012701 

8447 026672 
026672 

026672 020127 
026676 101032 

8448 026700 
026700 005737 
026704 002003 
026706 012737 
026714 

8449 026714 
026714 032701 
026720 001002 
026722 005337 
026726 

8450 026726 
026726 005737 
026732 001404 

8451 026734 
026734 010211 
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SEQ 0234 



000001 
002364 

002336 
002614 

002614 
002336 



005037 002366 



002366 
060000 

157776 

002370 
000007 

000374 
002370 

002370 



riTP022: SUBTST <<nTP022 REFRESH L SHIFTING DIAGONAL TEST>> 

mt>022 REFRESH C SHIFTING DIAGONAL TEST * * ****** 



:*SUBTEST 



(1) UE URITE A DIAGONAL PATTERN IN MEMORY (WITH CACHE ON). 

(2) IF A REFRESH TEST UE DISTURB ALL ROUS FOR > 2 MS (UITH CACHE ON). 

(3) UE READ 6 CHECK FOR CORRECTNESS THE DIAGONAL PATTERN 
(UITH CACHE OFF) 

:HOU OFTEN A DIAGONAL STRIPE OCCURS (MUST BE A POUER OF 2) 



KDIAG-8. 



002364 

000001 



002370 



002370 



FOR EVEN :» *1 TO W 
IF EVEN EQ 01 



LET R2 
LET R3 
ELSE 



ZEROS 
ONES 



;FOR DATA £ COMPLEMENT DATA 
MOV 01. EVEN 

B34::::::: 

CMP EVEN, 01 
BNE L235 

MOV ZEROS. R2 

MOV 0NES.R3 

BR L236 



LET R2 :« ONES 

LET R3 :« ZEROS 
END :0F IF EVEN 
FOR STRIPES «0 TO »KDIAG 1 

: URITE LOOP 
CACHON 

LET COUNT STRIPES 
LET Rl :• OFIRST 
UHILE Rl LOS «LAST 



IF COUNT LT *0 THEN LET COUNT := 



IF «374 OFF. IN Rl THEN LET COUNT 



L235: 



MOV 0NES.R2 
MOV ZEROS. R3 

:FOR THe'"nuMBER' OF 'stripes 
CLR STRIPES 
635:;:::;: 



;TURN CACHE ON 



MOV STRIPES. COUNT 
MOV OFIRST.RI 



B36: 



IF COUNT NE 00 
LET (Rl) :- R2 



CMP Rl.OLAST 
BHI L237 

OKOIAG-1 

TST COUNT 
BGE L240 

MOV OKDI AG -1. COUNT 

L240: ::;;;: 
:> COUNT - 01 

BIT 0374. Rl 
BNE L241 
DEC COUNT 
L241:i:s::i 

TST COUNT 
BEQ L242 

MOV R2.(R1) 



C3 
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MS2 026736 
026736 

8453 026742 
026742 
026744 

8454 026744 
026744 

8455 026746 
026746 

8456 026752 
026752 

8457 026752 
026752 

8458 026756 
026756 

8459 026762 
026762 
026764 
026764 

8460 
8461 

8462 026764 
026764 
026770 
026772 
026776 

8463 

8464 026776 
026776 

8465 027004 
027004 

8466 027010 



010261 
000403 

010311 
010361 

005337 
062701 
000743 



005737 
001002 
004737 



013737 

012701 
104424 



000002 



000002 

002370 
000004 



002004 
027166 

002366 
060000 



002370 



LET 2(R1) 
ELSE 



R2 



- «1 



LET (Rl) :» R3 
LET 2(R1) :» R3 
END J OF IF COUNT 
LET COUNT ;= COUNT 
LET Rl := Rl ♦ *4 
END :0F UHILE 



:END OF WRITE LOOP 

IF DIAGFLAG IS FALSE THEN $CALL REFRESH 



sREAD LOOP 
LET COUNT 

LET Rl ! 

CACHOFF 



STRIPES 
#FIRST 



SEQ 0235 



:TURN CACHE OFF 



MOV R2.2(R1) 

BR L243 

L242:s;:::: 

MOV R3,(R1) 

MOV R3.2(R1) 

L243::::::: 

DEC COUNT 

ADD #4.R1 

BR B36 
L237::::;:: 
E36:i::iii 

TST DIAGFLAG 
BNE L244 
JSR PC. REFRESH 
L244: :::::: 

MOV STRIPES. COUNT 
MOV OFIRST.Rl 
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SEQ 0236 









UHTl F Rl 1 Q<i <M A<iT 

Mn^LL Tlx kw«7 Wk~«7 * 










VC (VAC 


020127 


157776 




0P7016 








8469 027020 






IF COUNT LT *0 THEN LET COUNT •= 


027020 


005737 


002370 




027024 


002003 






027026 


012737 

VAC ' ^ ' 


000007 002370 




027034 








8470 027034 






IF #374 OFF IN Rl THEN LET COUNT 


027034 


032701 


000374 




027040 


001002 






027042 


005337 


002370 




027046 








8471 027046 






IF COUNT NE #0 


027046 


005737 


002370 




027052 


001412 






8472 027054 






LET RO :* (Rl) 


027054 


011100 






8473 0270b6 






IF R2 NE RO 


027056 


020200 






027060 


001401 






8474 027062 


104443 




PERR17 


8475 027064 






END :0F IF R2 


027064 








8476 027064 






LET RO 2(R1) 


027064 


016100 


000002 




8477 027070 






IF R2 NE RO 


027070 


020200 






027072 


001401 






8478 027074 


104443 




PERR17 


8479 027076 






END ;0F ir R2 


027076 








8480 027076 






ELSE 


027076 


000411 






027100 








8481 027100 






LET RO (Rl) 


027100 


011100 






8482 027102 

W~WK Vfc > A Vfc 






IF R3 NE RO 


027102 


020300 






027104 


001401 






8483 027106 


104444 




PERR20 


8484 027110 






END iOF IF R3 


027110 








8485 027110 






LET RO :» 2(R1) 


027110 


016100 


000002 




8486 027114 






IF R3 NE RO 


027114 


020300 






027116 


001401 






8487 027120 


104444 




PERR20 


8488 027122 






END :0F IF R3 


027122 








8489 027122 






END :0F IF COIWT 


027122 








8490 027122 






LET COUNT := COUNT - #1 


027122 


005337 


002370 




8491 027126 






LET Rl := Rl ♦ #4 



637:::;::: 

CMP Rl,#lAST 
BHI L245 

«K0IAG-1 

TST COUNT 
BGE L246 

MOV «K0IAG-1. COUNT 
L246: :::::: 
:= COUNT - #1 

BIT #374. Rl 
BNE L247 
DEC COUNT 
L247: :::;:: 

TST COUNT 
BEQ L250 

MOV (Rl).RO 

CMP R2.R0 
BEQ L251 



L251: :::::: 

MOV 2(R1).R0 

CMP R2.R0 
BEQ L252 

L252::ii::: 

BR L253 
L2S0::::::: 

MOV (Rl).RO 

CMP R3.R0 
BEQ L254 

L254::i:::i 

MOV 2(R1).R0 

CMP R3,R0 
BEQ L255 

L255::i:::; 
L253::iii:: 

DEC COUNT 
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MTP022 REFRESH £ SHIFTING DIAGONAL TEST SEQ 0237 



027126 


062701 


>)00004 








ADD »4.R1 


8492 027132 








END :0F UHILE 




027132 


000727 










BR 837 


027134 










L245: 


S 2 * • ■ • 


027134 










E37: ; 




8493 








:END OF READ LOOP 






8494 














8495 027134 








END ;0F FOR STRIPES 






027134 


005237 


002366 








INC STRIPES 


027140 


023727 


002366 


000007 






CMP STRIPES. «<DIAG-1 


027146 


003643 










BLE 835 


027150 










E35:: 




8496 027150 








END sOF FOR EVEN 




027150 


005237 


002364 






INC EVEN 


027154 


023727 


002364 


000002 






CMP EVEN. #2 


027162 


003616 










BLE B34 


027164 














8497 027164 


000207 






RETURN 






8498 














8499 027166 








REFRESH :SUBTST <<SUBR REFRESH DELAY >> 














I ******************************************************************************* 










s*SUBTEST SUBR REFRESH DELAY 














: ******************************************************************************* 


8500 








; DISTURB EACH ROW FOR > 3.2 MS 






8501 027166 








CnO OA . « ACTOCT Tn JiCTQCT . ^Til Ov Ail 

rUR RO :» ffrlRSi lO Or IRS I ♦374 BY M 






027166 


012700 


060000 








MntJ ACTOCT OA 

MOV PrlRST.RO 


027172 












8502 027172 


004737 


027236 




CALL REFSUB 






8503 027176 








END ;0F FOR RO 






027176 


062700 


000004 








ADO »4,R0 


027202 


020027 


060374 








CMP R0.»FIRST*374 


027206 


003771 










BLE B40 


027210 










E40- ; 




8504 027210 








LET RO :» #FIRST*BIT14 






027210 


012700 


120000 








MOV *FIRST»BIT14.R0 


8505 027214 








UHILE RO LOS *LAST*BIT14*374 




027214 














027214 


020027 


020372 








CMP RO.0LAST*BIT14*374 


027220 


101005 










BHI L256 


8506 027222 


004737 


027236 




CALL REFSUB 






8507 027226 








LET RO := RO ♦ #4 






027226 


062700 


000004 








ADD »4.R0 


8508 027232 








END jOF UHILE 






027232 


000770 










BR B41 


027234 










L256: 




027234 










E41: ; 




8509 027234 


000207 






RETURN 






8510 027236 


012704 


000640 




REFSUB: MOV #640. R4 jTIME FOR A 


> 3.2 MS 


LOOP 


8511 027242 


062700 


000002 




ADD <?2.R0 






8512 027246 


005140 






1$: COM -(RO) 






8513 027250 


005120 






COM (RO)* 






8514 027252 


005110 






COM (RO) 






8515 027254 


005110 






COM (RO) 






8516 027256 


077405 






SOB R4,l$ 






8517 027260 


162700 


000002 




SUB «2,R0 






6518 027264 


000207 






RETURN 







CVMJAAO MSVU-J MEMORY OIAG. 
SU6R REFRESH DELAY 

8521 027266 



8522 
8523 
8524 
8525 
8526 
8527 
8528 
8529 
8530 
8531 
8532 
8533 
8534 
8535 
8536 
8537 
8538 
8539 
8540 
8541 
8542 
8543 
8544 
8545 
8546 

8547 027266 011100 

8548 027270 020004 

8549 027272 001401 

8550 027274 104447 
8551 

8552 027276 011200 

8553 027300 020003 

8554 027302 001401 

8555 027304 104450 
8556 

8557 027306 

8558 027312 

8559 027314 
8560 

8561 027316 

8562 027322 
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MTPA24: SUBTST <<MTPA24 FAST GALLOPING PATTERN TEST>> 

J ♦SUBTEST MTPA24 FAST GALLOPING PATTERN TEST 

******************************************************************************** 

:THE TOTAL TEST (INCLUDING SETUP) IS AS FOLLOWS 
;*(!) THIS TEST WRITES THE MEMORY WITH A BACK GROUND PATTERN 

♦ STORED AT LOCATION BAKPAT 
♦(2) TEST BEGINS AT LOWEST LOCATION BEING TESTED 

♦ (LETS NAME IT 'A- ) 

♦(3) LETS NAME THE 1ST LOCATION IN THE ROW/COLUMN UNDER TEST AS 'B' . 
♦(4) SWAPS BYTES FOR LOCATION 'A'. 
♦(5) READS 'A' , READS 'B' 

♦(6) 'B' = 'B'*400 (ADDS 64 DOUBLE WORDS TO 'B') 
♦(7) REPEATS STEPS 5 AND 6 UNTIL 'B' IS GREATER THAN THE 
♦(8) END OF THE BANK A*2 

♦(9) REPEATS STEPS 3-8 UNTILL 'A' REACHES THE END OF THE BANK 
♦(10) AFTER EXECUTING THE TEST DATA IS COMPLEMENTED 

♦ AND STEPS 1-9 ARE REPEATED 
; REGISTERS ARE USED AS FOLLOWS 
iRO TEST DATA 
;R1 'A' 
;R2 'B' 
;R3 BAKPAT 
;R4 SWAPAT 
iR5 LAST 

NOTE THE PATTERN STARTS AT MTPB24! !!!!!!!!!!!!!! 
UIPAR'S 



SEU 0238 



062702 000400 
020205 
101764 

062701 000002 
000137 027326 





MOV 
CMP 
BEQ 

PERR23 


(Rl).RO 

R0.R4 

2i 


•V177640 
V177642 

,V177644 
V177646 


READ 'A' 
CHECK 'A' 
BR IF OK 
REPORT ERROR 


2i: 


MOV 
CMP 
BEQ 
PERR24 


(R2).R0 

R0,R3 

3$ 


V177650 
V177652 
V177654 
V177656 


READ 'B' 
CHECK 'B' 
BR IF OK 
REPORT ERROR 


3$: 


ADD 
CMP 
BLOS 


»400.R2 

R2.R5 

1* 


V177660 
V177664 
V177666 


BUMP 'B' 
AT END YET? 
BR IF NO 




ADD 
JMP 


*2.R1 :V177670 ;BUMP 'A' 
a#MTPB24 SV177674 {GOTO V177260 



G3 



CVMJAAO MSVll-J r€MORY 
MTPA24 FAST GALLOPING 

8565 027326 



8566 
8567 
8568 
8569 
8570 
8571 
8572 
8573 



8574 
8575 
8576 
8577 
8578 
8579 
8580 
8581 



027326 
027330 
027332 
027334 
027336 

027342 



027342 
027344 
027346 
027350 
027352 
027354 



010411 
020105 
001001 
000207 
000137 
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PATTERN TEST 

riTPB24: SUBTST <<MTPB24 FAST GALLOP PART B>> 

:*SUBTEST MTPB24 FAST GALLOP PART B 

:SDPAR'S 



SEG 0239 



010102 
011100 
020004 
001401 
104447 
000137 



027342 



027306 



1(: 



MOV 
CMP 
BNE 

RETURN 
JMP 



R4,(R1) 
R1.R5 
1$ 

9«MTPC24 



V172260 
VI 72262 
V172264 
V172266 
V172270 



WRITE 'A' 
DONE? 
BR IF NO 
YES RETURN 
GOTO V172360 



MTPC24: SUBTST <<MTPC24 FAST GALLOP PART C>> 

! ♦SUBTEST MTPC24 FAST GALLOP PART C 

sKDPAR'S 



1$: 



MOV 
MOV 
CMP 
BEQ 
PERR23 
JMP 



R1.R2 
(Rl).RO 
R0,R4 
1$ 

9«MTPA24«20 



VI 72360 
V172362 
V172364 
V172366 
VI 72370 
V172372 



RESET '8' <- 
READ 'A' 
CHECK 'A' 
BR IF OK 
REPORT ERROR 
GOTO V177660 



CVMJAAO MSVll-J MEMORY DIAG. 
MTPC24 FAST GALLOP PART C 

8584 027360 



8585 027360 

8586 027364 

8587 027366 

8588 027370 

8589 027372 
8590 

8591 027374 



8592 
8593 
8594 
8595 
8596 
8597 
8596 
8599 
6600 
6601 
8602 
6603 
6604 
6605 
6606 
8607 
8608 
6609 



6610 
8611 
8612 
8613 
8614 
8615 
8616 
8617 
8618 
6619 
8620 
8621 
8622 



027374 
027400 
027402 
027404 
027406 
027410 
027412 
027414 
027416 
027420 
027424 
027426 



027430 



027430 
027434 
027436 
027440 
027442 
027446 

027450 



8623 027450 

8624 027452 

8625 027456 

6626 027460 

6627 027462 



000137 
010221 
010321 
077005 
000207 



027430 
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MTPA26: SUBTST <<MTPA26 RANDOM DATA (URITE)>> 

:*SUBTEST MTPA26 RANDOM DATA (WRITE) 

; ******************************************************************************* 



SEQ 0240 



1»: 



JMP 
MOV 
MOV 

SOB 

RETURN 



a#MTPC26 
R2.(R1)* 
R3.(R1)« 
R0.1« 



V177640 
V177644 
V177646 
V177650 
V177652 



GOTO V172360 



MTPB26: SUBTST <<MTPB26 RANDOM DATA (READ)>> 

; ******************************************************************************* 

:*SIJBTEST MTPB26 RANDOM DATA (READ) 

.OSABL AMA 



000137 027430 

020221 

001401 

104451 

005127 

000000 

020321 

001401 

104451 

C05167 177764 

077015 

000207 



2i: 

RANODD: 



3$: 



.ENABL 

JMP 

CMP 

BEQ 

PtRR25 

COM 

0 

CMP 

BEQ 

PERR25 

COM 

SOB 

RETURN 
.DSABL 
.ENABL 



LSB 

9«MTPC26 
R2.(R1)« 
2$ 

(PC)* 

R3,(R1)« 
3$ 

RANODD 
R0.1$ 

LSB 
AMA 



V177640 
V177644 
V177646 
V177650 
V177652 
V177654 
V177656 
V177660 
V177662 
V177664 
V177670 
V177672 



GOTO V172360 



FOR ERROR REPORTING 



073427 000007 
060305 
005504 
060204 

062705 001057 
000240 



005504 

062704 047401 

010503 

010402 

000137 027364 



MTPC26: SUBTST <<RANDOM NUMBER SU6PR0GRAM>> 
i*SUBTEST RANDOM NUMBER SUBPROGRAM 

:*•****•*«********************************************************************** 

{CALLER MUST SETUP 
; MOV SEEDL0.R3 

; MOV SEEDHI.R2 

! MOV R3.R5 

MOV R2.R4 
#7.R4 ;V172360 
R3.R5 ;V172364 
R4 :V172366 
R2,R4 ;V172370 
#1057. R5 ;V172372 



ASHC 
ADD 
ADC 
ADO 
ADD 
NOP 



V172376 



GOTO V172260 



MTPD26: SUBTST <<RAN00M NUMBER SUBSUBPFOGRAM>> 
i*SUBTEST RANDOM NUMBER SUBSUBPROGRAM 

:********«****•***************************************************•************* 



ADC 
ADD 
MOV 
MOV 
JMP 



R4 

«47401.R4 
R5.R3 
R4.R2 
9«MTPA26«4 



V172260 
V172262 
V172266 
V172270 
V172272 



GOTO V177644 



CVMJAAO MSVll-J MEMORY DIAG. 
RANOOH NUMBER SUBSUBPROGRAM 

8630 027466 



8631 027466 

8632 027470 

8633 027472 

8634 027474 
8635 

8636 027476 



8637 
8638 
8639 
8640 
8641 
8642 
8643 
8644 
8645 
8646 
8647 
8648 
8649 
8650 
8651 
8652 
8653 
8654 
8655 
8656 
8657 
8658 
8659 



027476 
027500 
027502 
027506 
027512 
027514 
027516 
027522 
027526 

027530 
027532 
027534 
027536 
027542 
027544 

027546 
027550 
027552 



011002 
010220 
077103 
000207 



000000 
077001 
005167 
020167 
001403 
104454 
010167 
005167 
010200 

010503 
005725 
010504 
020537 
001001 
000207 

014344 
001376 
000752 
000056 
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MTP030: SUBTST <<MT0030 FLUSH OUT OBE'S'> 

; ♦SUBTEST MT0030 FLUSH OUT DBE'S 



SEQ 0241 



177772 
177766 



177756 
177752 



0C?522 



1»: 



MOV 

MOV 
SOB 

RETURN 



(R0).R2 
R2,(R0)* 
Rl.l$ 



V177640 
V177642 
V177644 
V177646 



MTP031: SUBTST <<MTP03i SOB-A-LONG TEST>> 

; ******************************************************************************* 

;*SUBTEST MTP031 SOB-A-LONG TEST 

;******************************************************************************» 

.OSABL AMA 

:M0VE TERMINATOR 
1$: SOB RO.l* iSOB TILL RO UNDERFLOWS 

; WRITE COMPLEMENT OF SOB 
sREAO L CHECK FOR NOT "SOB RO.OOT" 
:0K - SKIP 



2$: 



0 

SOB 
COM 
CMP 
BEQ 

PERR30 
MOV Rl.li 
COM 1$ 
MOV R2,R0 
; UPDATE MOVE REGISTERS 



RO.l* 
1$ 

Rl.l$ 
2$ 



MOV 
TST 
MOV 
CMP 
BNE 

RETURN 



R5.R3 
(R5)* 
R5.R4 
RS,9«LINK1 
3$ 



: CORRECT SOB INSTRUCTION 
{REINITIALIZE SOB CONSTANT 



:BUMP (SAFELY) BY 2 



:DONE? 
;N0 - SKIP 
{YES 



3$ 



MOV 
BNE 
BR 

S0BLENGTH= . -MTP031 
.ENABL AMA 



-(R3).-(R4) 
3$ 
II 



CVMJAAO MSVll-J MCMORY DIAG. 
riTP03i 508 A-LONG TEST 
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J3 

10 Page 272 



SEQ 0242 



Boo ' 


A97CC4 










0O07 






AiLOA 
IJ07U 


























Uc r 330 


rt901 n9 




vc ' SOU 




0070 


Ue ' 30e 




007 f 






6698 


027566 


013703 


8699 


027572 


012400 


8700 


027574 


020005 


8701 


027576 


001401 


8702 


027600 


104427 


8703 


027602 


077305 


8704 


027604 


000207 



f1TP032: SUBTST <<MTP032 URITE RECOVERY TEST>> 

; •SUBTEST MTP032 URITE RECOVERY TEST 

:THE TEST ACTUALLY EXECUTED ALREADY IN THE MEMORY UNDER TEST. 
:THIS CODE INSURES THAT IT CHANGED MEMORY TO HAVE 



ir 

2$: 

4r 



sl/2 BANK OF #5141 
J 1/2 BANK OF #110 



MOV 

CMP 

6EQ 

PERR02 

SOB 

MOV 

MOV 

CMP 

BEQ 

PERROl 

SOB 

RETURN 



WHICH IS A "COM -(Rl)" INSTRUCTION AND 
WHICH IS A "JMP (RO)" INSTRUCTION. 



(R4)*.R1 


V177640 


GET DATA FROM LOWER 1/2 


R1,R2 


V177642 


IS IT 05141? 


21 


V177644 


YES - SKIP 




V177646 


NO - TAKE ERROR TRAP 


R3.1* 


V177650 


LOOP FOR 1/2 BANK 


9«LINK1.R3 


V177652 


RESTORE LOOP SIZE 


(R4)*.R0 


V177656 


GET DATA FROM UPPER 1/2 


R0,R5 


V177660 


IS IT #110? 


4$ 


V177662 


YES - SKIP 




V177664 


NO- TAKE ERROR TRAP 


R3,3$ 


V177666 


LOOP FOR 1/2 BANK 



I<3 



CVMJAAO MSVll-J MEMORY DlWi. 
MTP032 WRITE RECOVERY TEST 



8707 


027606 




8708 






8709 


027606 


000000 


8710 


027610 


000000 


8711 


027612 


000261 


8712 


027614 


105511 


8713 


027616 


100402 


8714 


027620 


105212 


8715 027622 


000773 


8716 






8717 






8/18 


027624 


102401 


8719 


027626 


104461 


8720 






8721 


027630 


000242 


8722 


027632 


105212 


8723 027634 


103402 


8724 


027636 


102001 


8725 027640 


100401 


8726 027642 


104461 


8727 






8728 






8729 






8730 


027644 


010701 


8731 


027646 


162701 


8732 


027652 


010102 


8733 


027654 


005202 


8734 






8735 






8736 


027656 


010503 


8737 


027660 


005725 


8738 


027662 


010504 


8739 






8740 






8741 


027664 


020537 


8742 


027670 


001001 


8743 


027672 


000207 


8744 






8745 






8746 


027674 


014344 


8747 


027676 


001376 


8748 


027700 


005011 


8749 027702 


000743 


8750 




000076 


8751 
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MTP033: SUBTST <<MTP033 BRANCH COBBLE TEST>> 

; **************************************************** 

; ♦SUBTEST MTP033 BRANCH GOBBLE TEST 

;*************«*******************************•*****< 

. DSABL AMA 

jMOVE TERMINATOR 



SEQ 0243 



BGTEST . 
BRGOBB: 



1*: 
2$: 

3$: 



4*; 
5$: 



0 
0 

SEC 

ADCB 

BMI 

INCB 

BR 



(Rl) 
1« 

(R2) 
BRGOBB 



jNOU CHECK FOR CORRECT 



BVS 
PERR35 

CLV 

INCB 

BCS 

BVC 

BMI 

PERR35 



2$ 



(R2) 
3$ 
3$ 
4$ 



TEST WORD (TUO BYTES) 
SET CARRY (TO BE ADDED TO "BGTEST") 
INCREMENT LOU BYTE OF "BGTEST" 
BRANCH WHEN BIT7 IS SET 
INCREMENT HIGH BYTE OF -BGTEST" 
LOOP 128 TIMES 



CONDITION CODES 
;BR IF V-BIT SET (SHOULD BE) 
;N0 - REPORT ERROR AND ABORT TEST 
iCOND CODES NOT EQUAL TO 1010 
I CLEAR V-BIT 

[INCREMENT HIGH BYTE OF "BGTEST" ONCE 
;BR IF C-BIT SET (SHOULD NOT BE) 
;BR IF V-BIT CLEAR (SHOULD NOT BE) 
iBR IF N-BIT SET (SHOULD BE) 
iNO - REPORT ERROR AND ABORT TEST 
iCOND CODES NOT EQUAL TO 1010 



MORE 



; UPDATE TEST POINTERS 

MOV PC.Rl 

SUB #5$ -BGTEST, Rl 

MOV R1.R2 

INC R2 

i UPDATE MOVE REGISTERS 

MOV R5.R3 

TST (R5)» 

MOV R5.R4 

jDONE? 

CMP R5,a#LINKl 

BNE 6$ 
RETURN 



;MOVE CODE 1 LOCATION 
6$: MOV -(R3),-(R4) 

BNE 6$ 

CLR (Rl) 

BR BRGOBB 
GBLENGTH-.-MTP033 

.ENABL AMA 



;BUMP (SAFELY) BY 2 



DONE? 

NO - SKIP 

YES - RETURN 



i CLEAR TEST WORD "BGTEST" 
iRUN MOVED CODE AGAIN 



CVMJAAO MSVll-J f«MORY OIAG. 
MTP033 BRANCH GOBBLE TEST 

8753 027704 
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SEQ 0244 



8754 
8755 
8756 
8757 
8758 
8759 
8760 
8761 
8762 
8763 



027704 
027706 
027710 
027712 
027714 
027716 
027720 
027722 
027724 
027726 



010220 
077102 
000207 
012401 
020102 
001402 
104430 
000240 
077306 
000207 



MTP034: SUBTST <<MTP034 SOFT ERROR - BACKROUNO PATTERN TFST>> 

******************************************************************************* 

•SUBTEST MTP034 SOFT ERROR - BACKROUNO PATTERN TEST 



II: 



2t: 



MOV 

SOB 

RETURN 

MOV 

CMP 

BEQ 

PERR02 

NOP 

SOB 

RETURN 



R2.(R0)* 
R1.MTP034 

(R4)».R1 
R1.R2 



RZ.Zi 



V177640 
V177642 
V177644 
V177646 
V177650 
V177652 
V177654 
V177656 
V177660 
V177662 



M3 
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MTP034 SOFT ERROR - BACKROUND PATTERN TEST 



SEQ 0245 



8765 027730 



8766 
8767 
8768 



027730 012737 000003 002076 



«TP035:SUBTST <<MTP035 UORST CASE NOISE PARITY TEST>> 

;*SUBTEST MTP035 UORST CASE NOISE PARITY TEST 

MOV «3.N0PAR :SET PARITY TRAPS TO RETURN TO "PARTHERE' 



8769 

8770 

8771 

8772 

8773 

8774 

8775 

8776 

8777 

8778 

8779 

8780 

8781 

8782 

8783 

8784 

8785 

8786 

«787 

8788 

8789 

8790 

8791 

8792 



8793 
8794 
8795 



027736 
027736 
027742 
027742 
027750 
027752 
027760 
027762 
027764 
027770 
027772 
027776 
030004 
030006 
030010 

030012 
030014 
030016 
030024 
030026 
030034 
030036 
030040 
030044 
030046 
030052 
030052 
030056 
030062 
030064 

030064 
030070 



012700 

012737 
104425 
012737 
011010 
005710 
010037 
104050 
004737 
032763 
001002 
104426 
104512 

104503 
011010 
012737 
104425 
012737 
005710 
000405 
010037 
104050 
004737 

062700 
020027 
003727 



005037 
000207 



060000 
000005 
030006 

002034 

050446 

002000 



000001 
030040 

002034 

050446 

004000 
157776 

002076 



002150 
002304 



002666 



002150 
002304 



2%. 



3^ 
4$; 



B42: 



MOV OFIRST.RO 



FOR RO »FIRST TO »LAST BY »4000 

MOV «IT2!BIT0,CSR j SET WRITE WRONG PARITY t PAR. TRAPS INTO CSR 
LOAOCSR 

MOV «1$, PARTHERE 

MOV (RO).(RO) jWWP TEST LOCATION 

TST (RO) 

MOV RO, ADDRESS 

ERROR *50 

CALL PERBNK 

BIT «BIT10.C0NFIG*2(R3} 
BNE 2\ 
: READCSR 
ERRGEN 



CLRICSR 

MOV (RO).(RO) 
MOV *BIT0.CSR 
LOAOCSR 

MOV PARTHERE 
TST (RO) 
BR 4t 

MOV RO. ADDRESS 
ERROR *50 
CALL PERBNK 
END; OF FOR 



(CLEAR WRONG PARITY IN MEMORY 



E42: 



ADO MOOO.RO 
CMP RO,«LAST 
BLE B42 



CLR 

RETURN 



NOPAR 



{RESET PARITY TRAP ACTION 



N3 



cvnjAAO nsvii J nenoRY diag. 

nTP035 UORST CASE NOISE PARITY 
8797 030072 
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SEQ 0246 



012705 177776 



002324 



030276 
000005 
000004 

002150 



mP036: SUBTST 



<<MTP036 



CORRECTION CODE TEST» 



8798 
8799 
8800 
8801 

8802 030072 104424 

8803 030074 105037 002264 

8804 030100 104513 

8805 030102 
030102 

8806 030102 

030102 105237 002264 

8807 030106 

030106 012704 177777 

8808 030112 

030112 005037 002324 

8809 030116 

030116 123727 002264 000001 
030124 001003 

8810 030126 

030126 012705 000001 

8811 030132 
030132 000402 
030134 

8812 030134 
030134 

8813 030140 
030140 

8814 030140 
030140 

8815 

8816 030140 00523^ 

8817 030144 
030144 005204 

8818 030146 
030146 116402 

8819 030152 072227 

8820 030156 052702 
88^1 030162 

030162 010237 

8822 030166 104425 

8823 030170 
030170 010011 

8824 030172 005711 

8825 030174 
030174 021105 
030176 001412 

8826 030200 

030200 012737 060000 002034 

8827 030206 

030206 010237 002314 

8828 030212 

030212 010537 002246 

8829 030216 



•SUBTEST 



nTP036 CORRECTION CODE TEST 



THIS TEST CHECKS TO SEE THAT EACH BIT OF A DATA UORD 
CAN BE CORRECTED INDIVIDUALLY FROM A ZERO TO A ONE AND 
VISA VERSA. 



CACHOFF 
CLRB PASFLG 
CBREG 
REPEAT 

LET PASFLG :B> PASFLG * «1 
LET R4 :- #-1 
LET BITNO #0 
IFB PASFLG EQ «1 

LET R5 := #1 
ELSE 

in R5 #177776 

ENC 

REPEAT 

INC BITNO 

LET R4 :> R4 • «1 

LET R2 :8- PTABLE(R4) 

ASH «5.R2 
BIS #BIT2.R2 
LET CSR ;» R2 



LOAOCSR 
LET (Rl) 



RO 



TST (Rl) 

IF (Rl) NE R5 



LET ADDRESS 
LET CHECK 
LET TSTDAT : 



:< #60000 
R2 
■ R5 



J TURN OFF CACHE 
; CLEAR PASFLG 

; ENABLE CHECK/SYNDROME BIT REGISTER 
■ 

B43: s ; s : > ; 
: INCREMENT LOOP COUNTER 

INCB PASFLG 
ilNDEX TO SINGLE BIT ERROR TABLE 

MOV #-l.R4 
i CLEAR INNER LOOP COUNTER 

CLR BITNO 

: SELECT DATA TO BE CORRECTED BY PASSNO 

CMPB PASFLG. «1 
BNE L257 

:DATA-OiBIT TO BE CORRECTED IS A ONE 

MOV «1.R5 



L257: 



BR L260 



DATA«177776;BIT TO BE CORRECTED IS A ZERO 

MOV #177776. R5 



L260: 
B44: : 



LET TSTDAT. 2 :« (Rl) 



{INCREMENT BIT POINTER 
{POINT TO NEXT SET OF CHECK BITS 

INC R4 

;GET NEXT SET OF CHECK BITS 

MOVB PTABLE(R4),R2 

.•SHIFT TO LINE UP IN CSR 

{ENABLE DIAG MODE 

{GET CHECK BITS TO BE WRITTEN 

MOV R2,CSR 

{LOAD CSR UITH DATA 

iURITE DATA TO TEST ADDRESS 

MOV RO.(Rl) 

{CORRECT 3BE 

{UAS DATA CORRECTED??? 

CMP (R1),R5 
BEQ L261 
MOV ERROR INFORMATION IN 

MOV #60000, ADDRESS 

MOV R2. CHECK 

MOV R5. TSTDAT 



CVMJAAO MSVll-J MEMORY OIAG. 
MTP036 CORRECTION CODE TEST 



B4 
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030216 

8830 030222 

8831 030224 
030224 

8832 030224 

8833 030226 
030226 
030234 

8834 030236 
6835 030240 

030240 
030242 

8836 030242 

8837 030244 

8838 030246 
030246 

8839 030246 
030246 
030254 
030256 

8840 030256 
8641 030260 

030260 
030266 
030270 

8842 030270 

8843 030272 

8844 030274 
8845 

8846 
8647 

8648 030276 
030301 
030304 
030307 
030312 
030315 



011137 
104052 



005011 

123727 
001002 
006305 

000402 

000261 
006105 



023727 
001331 

005100 

123727 
001305 

104503 
104423 
000207 



002 
031 
026 
051 
046 
070 



002250 



002264 000001 



002324 000020 



002264 000002 



007 
032 
020 
052 
040 



ERROR •52 

END 

CLR (Rl) 

IFB PASFLG EQ »1 



ASL RS 
ELSE 



SEC 
RQL 



R5 



END 

UNTIL BITNO EQ iM6. 



COM RO 
UNTILB PASFLG EQ «2 



CLRICSR 

CACHON 

RETURN 



SEQ 0247 



:N0 ERROR 



NOV (R1).TSTDAT.2 



L261 

; CLEAR LUT 

s SHIFT NEW DATA DEPENDING ON PASFLG 

CMPB PASFLG. #1 
BNE L262 

; SHIFT BITNO TO THE LEFT 



BR L263 



L262: 

;SET CARRY BIT AND... 
:ROTATE LEFT 



L263: :::::: 
i UNTIL ALL BITS ARE DONE 

CMP BITNO. «16. 
BNE 644 

f 44 

! COMPLEMENT DATA AND 'REPEAT 
.•UNTIL 2 PASSES ARE COMPLETE.' 

CMPB PASFLG, #2 
BNE B43 
E43: :::::: 

CLEAR CSR 
TURN CACHE 



037 PTABLE: 

025 

057 

045 

075 



MSVll-P SINGLE BIT ERROR CHECK BIT TABLE 
.BYTE 2.7.37.31,32.25.26.20.57.51.52.45.46.40.75.70 



CVMJAAO MSVll-J MEMOPY DIAG. 
MTP036 CORRECTION CODE TEST 

8850 030316 



8851 
8852 
8853 
8854 



88SS 


030316 




8856 


030320 






030320 




8857 


030324 






030324 




8858 


030330 




8859 030332 






030332 


012737 


8860 


030340 


104475 


S861 


030342 






030342 


005011 


8862 


030344 






030344 


005711 




030346 


001406 


8863 


030350 






030350 


011137 


8864 


030354 






030354 


012737 


8865 


030362 


104037 


8866 


030364 






030364 




8867 


030364 


104423 


8868 


030366 


000207 



002052 
060000 



C4 
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riTP037: SUBTST <<MTP037 CHECK ECC DISABLE TEST>> 

;*********•****••••**•*••*•••*••**•••••••*•••*••******•••••••••••••••••••••••••« 

{•SUBTEST MTP037 CHECK ECC DISABLE TEST 

••••••••••••• 

THIS TEST CHECKS THAT ECC CAN 8E DISABLED AND THAT 
NO CORRECTION TAKES PLACE UITH ECC DISABLED. 



SEQ 0248 



002044 
002314 

000100 002314 



002034 



CACHOFF 

LET GOOD #0 
LET CHECK := #0 



CBICSR 
LET CHECK 

CBICSR 
LET (Rl) : 



#100 



= #0 
IF (Rl) NE #0 

LET BAD := (Rl) 
LET ADDRESS :« 060000 
ERROR *37 



J TURN OFF CACHE 

:G00D DATA FOR ERROR PRINT OUT 

CLR GOOD 

.•CLEAR CHECK BIT FIELD 

CLR CHECK 
; ENABLE SYNDROME/CHECK BIT REGISTER 
sSBE CHECK BITS 

MOV #100, CHECK 

; WRITE CHECK BITS TO CB REGISTER 
; WRITE CHECK BITS TO MEMORY 



sWAS CORRECTION MADE???? 
{YES IT WAS ERROR 



CLR (Rl) 

TST (Rl) 
BEQ L266 

MOV (RD.BAD 

MOV #60000. ADDRESS 



END 

CACHON 
RETURN 



iTURN ON CACHE 



L266:i 



012700 177740 



CVMJAAO MSVll-J MEMORY DIAG. 
MTP037 CHECK ECC DISABLE TEST 

8871 030370 



8872 
8873 
8874 
8875 

8876 030370 

030370 013704 002102 

8877 030374 072427 000011 

8878 030400 042704 170037 

8879 030404 
030404 

8880 030410 
030410 012701 060000 
030414 162701 004000 

8881 030420 

030420 105037 002264 

8882 030424 005037 002314 

8883 030430 104475 

8884 030432 
030432 

8885 030432 105237 002264 
6886 030436 

030436 062700 000040 
0887 030442 

030442 062701 004000 

8888 030446 

030446 012737 001340 

8889 030454 104475 

8890 030456 
030456 005011 

8891 030460 104503 

8892 030462 005711 
6693 030464 104426 
8694 030466 

030466 013705 002150 
6695 030472 042705 170037 
6896 030476 

030476 010002 

8897 030500 060402 

8898 030502 000240 
6699 030504 

030504 020205 
030506 001405 

8900 0^0510 

030510 010237 002052 

8901 030514 

030514 010537 002044 
6902 030520 104455 

8903 030522 
030522 

8904 030522 
030522 005011 

8905 030524 104475 

8906 030526 
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MTP041: SUBTST <<MTP041 ADDRESS TO CSR ON DOUBLE BIT ERROR TEST>> 

******************************************************************************* 
♦SUBTEST MTP041 ADDRESS TO CSR ON DOUBLE BIT ERROR TEST 

**************************************************************************t**** 

THIS TEST CHECKS TO SEE IF THE CORRECT ADDRESS APPEARS 
IN CSR BITS 5-11 ON A DOUBLE ERROR. 



002314 



LET R4 BANK 

ASH «9.,R4 
BIC »tC7740,R4 
LET RO :« #-40 

LET Rl := OFIRST 

LET PASFLG :B' #0 

CLR CHECK 

CBICSR 

REPEAT 



;GET STARTING BANK NUMBER 

MOV BANK.R4 

s SHIFT INTO POSTION TO MATCH ADDRESS IN CSR 
s CLEAR OFF EXTRANEOUS BITS 

:INIT CSR ADDRESS TO 0 - IK (BIT 5 « IK ADD.) 

MOV «-40,R0 

#4000 :GET LOU ADDRESS IN BANK 

MOV ftFIRST.Rl 
SUB #4000, Rl 

sINIT PASFLG 

CLRB PASFLG 
; CLEAR CHECK BIT FIELD TO BE LOADED 
: ENABLE CHECK/SYNDROME BIT REGISTER 



INCB PASFLG 
LET RO :» RO 



B45: 



LET Rl := 

LET CHECK 

CBICSR 
LET (Rl) ; 

CLRICSR 
TST (Rl) 
READCSR 
LET R5 : 



* #40 
Rl * #4000 
:= #1340 

:= #0 
CSR 



J INC LOOP COUNTER 
;INC CSR ADDRESS TO BE EXPECTED 



; DOUBLE ERROR CHECK BITS 



ADD #40. RO 
ADD #4000. Rl 
MOV #1340. CHECK 



BIC #tC77/'.0.R5 
LET R2 RO 

ADD R4.R2 
NOP 

IF R2 NE R5 



LET BAD : 
LET GOOD 
PERR31 

END 

LET (Rl) 
CBICSR 



= R2 
:= R5 

#0 



: WRITE DOUBLE ERROR CHECK BITS 
: WRITE DATA AND D.E. CHK BITS AT A=0 

CLR (Rl) 

•CLEAR CSR 

.'read ADDRESS TO GET DOUBLE ERROR 
iREAD CSR FOR CORRECT ADDRESS 

MOV CSR.R5 

.•GET CORRECT ADDRESS 

MOV R0.R2 

iADD STARTING BANK TO DOUBLE BIT ADDRESS 

i DEBUG AIDE 

;D0 ADDRESSES AGREE? 

CMP R2,R5 
BEQ L267 

MOV R2.BAD 

MOV R5.G00D 



:N0 ERROR 



L267: 



UNTILB PASFLG EQ PASCNT :D0 16K AT A TIME 



CLR (Rl) 

: ENABLE CHECK/SYNDROME BIT REGISTER 



SEQ 0249 



E4 
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030526 123737 002264 002570 

030534 001336 

030536 

8907 030536 104503 CLRICSR ; 

8908 030540 000207 RETURN ; 
8909 



SEQ 0250 

CMPB PASFLG.PASCNT 
BNE B4b 

B45:;;:s;; 



F4 
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SEQ 0251 



8912 030542 



8913 
8914 
8915 
8916 
8917 

8918 030542 

8919 030544 
030544 

8920 030550 
030550 
030556 

8921 030560 
030560 

8922 030566 
030566 
030570 

8923 030570 
030570 

8924 030576 
030576 

8925 030576 

8926 030602 

8927 030606 

8928 030612 

8929 030620 
030620 

8930 030624 
030624 

8931 030630 

8932 030634 

8933 030640 

8934 030644 

8935 030646 
030646 

8936 030646 

8937 030652 
030652 

8938 030660 

8939 030662 
030662 

8940 030664 

8941 030666 

8942 030670 

8943 030672 

8944 030700 
030700 
030704 

8945 030706 
030706 

8946 030714 
030714 

8947 030720 

8948 030722 



MTP042: SUBTST <<MTP042 EXTENDED ADDRESS TO CSR ON ERROR TEST>> 

******************************************************************************* 

♦SUBTEST MTP042 EXTENDED ADDRESS TO CSR ON ERROR TEST 

******************************************************************************* 

THIS TESTS THE EXTENDED Q BUS ADDRESS IN THE 

CSR BY CAUSING A SINGLE ERROR. ENABLING BIT « 14. THEN CHECKING 
FOR THE PROPER ADDRESS IN THE CSR. 



104424 

013704 

023727 
001004 

012737 

000403 



002102 
002102 

000001 



000177 
002570 



012737 000002 002570 



042704 
072427 
052704 
062737 



177607 
000002 
040000 
000400 



172352 



105037 002264 



013705 
042705 
072527 
052705 
104513 



105237 

012737 
104425 

005011 
104503 
005711 
104426 
042737 

023705 
001406 

013737 

010537 
104023 



002102 
177770 
000011 
000020 



002264 
000104 



002150 



020000 
002150 

002150 
002044 



002150 



002052 



CACHOFF 

LET R4 := BANK 
IF BANK EQ «177 

LET PASCNT : 

ELSE 



LET PASCNT 



n 



«2 



END 



BIC #tC170.R4 
ASH «2.R4 
BIS #BIT14.R4 
ADD M00.KIPAR5 
LET PASFLG :B» «0 

LET R5 := BANK 

BIC OtC7.R5 
ASH »9.,R5 
BIS «6IT4,R5 

CBREG 
REPEAT 

INCB PASFLG 
LET CSR :« *104 



LOADCSR 
LET (Rl) 



«0 



CLRICSR 
TST (Rl) 
REAOCSR 

BIC 0BIT13.CSR 
IF CSR NE R5 THEN 



END 



LET BAD 
LET GOOD : 
ERROR •23 



CSR 
' R5 



.-TURN OFF CACHE MEMORY 

:GET BANK NUMBER TO FIGURE OUT EXTENDED ADDRESS 

MOV BANK.R4 



:D0 ONCE IN LAST BANK 



L271i 



CMP BANK.«177 
BNE L271 

MOV «1. PASCNT 

BR L272 



MOV 02. PASCNT 
L272:s!:s:! 

CLEAR OFF LOWER BITS 

SHIFT TO LINE UP WITH CSR 

SET EXTENDED ADDRESS BIT 

SET UP PAR TO POINT TO TOP OF A BANK 

INIT LOOP COUNTER 

CLRB PASFLG 

R5 GETS THE BANK NUMBER 

MOV BANK.R5 

CLEAR ALL BUT THE LOWER BITS 
ROTATE INTO POSTION 

SET UP SBE INDICATOR ;;DATA TO BE EXPECTED 
ENABLE CHECK/SYNDROME BIT REGISTER 



B46: 



:INCR LOOP COUNTER 
: WRITE CHECK BITS TO CSR WITH DIAG MODE 

MOV C104.CSR 

:LOAD CSR WITH DATA 

:WRT ZEROS AT A»0 AND SINGLE ERROR BITS 

CLR (Rl) 

• CLEAR CSR 

I READ A>0:0ATA BIT 0 SHOULD BE CORRECTED TO A 1 
'READ CSR FOR DATA 

i CLEAR POSSIBLE INHIBIT MODE IN DATA "CSR" 

iHAS SINGLE ERROR BITS SET IN CSR? 

CMP CSR.R5 
BEQ L273 

MOV CSR, BAD 

MOV R5.G000 



G4 
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MTP042 EXTENDED ADDRESS TO CSR ON ERROR TEST SEQ 0252 





030722 












8949 


030722 








LET CSR := #40000 


iURITE EQB BIT TO CSR 




030722 


012737 


040000 


002150 




MOV 040000. CSR 


8950 


030730 


104425 






LOAOCSR 


8951 


030732 


104426 






REAOCSR 


Iread for correct extended q-bus address 


8952 


030734 


042737 


020000 


002150 


BIC *BIT13.CSR 


: CLEAR INHIBIT MODE POINTER IN DATA 


8953 


030742 








IF CSR NE R4 THEN 


:READ EQB ADDRESS 




030742 


023704 


002150 






CMP CSR.R4 




030746 


001411 








BEQ L274 


8954 


030750 








LET BAD : CSR 






030750 


013737 


002150 


002052 




MOV CSR, BAD 


8955 


030756 








LET GOOD :- R4 




030756 


010437 


002044 






MOV R4.G00D 


8956 


030762 








SET HEADER 






030762 


012737 


177777 


002612 




MOV 0-1. HEADER 


8957 


030770 


104023 






ERROR *2Z 


8958 


030772 








END 






030772 












8959 


030772 








LET (Rl) := ffO 


: CLEAR LUT 




030772 


005011 








CLR (Rl) 


8960 


030774 








LET Rl := #137776 


;SET UP NEW ADDRESS 




030774 


012701 


137776 






MOV #137776, Rl 


8961 


031000 


062705 


000740 




ADD #740, R5 


:ADD TO GET NEW ADDRESS 


8962 


031004 


052704 


001000 




BIS #BIT9,R4 


;SET BIT 9 SINCE UE ARE ASSERTING Al ON PASS2 


8963 


031010 


104513 






CBREG 


{ENABLE CHECK/SYNDROME BIT REGISTER 


8964 


031012 








UNTILB PASFLG EQ PASCNT 


;LOOP 2 TIMES 




031012 


123737 


002264 


002570 




CMPB PASFLG, PASCNT 




031020 


001312 








BNE B46 




031022 










E46: :::::: 


8965 


031022 


104503 






CLRICSR 


: CLEAR CSR 


8966 


031024 


104423 






CACHON 


;TURN ON CACHE 


8967 


031026 


000207 






RETURN 
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MTP042 EXTENDED ADDRESS TO CSR 

8969 031030 



8970 
8971 
8972 
8973 
8974 



8975 031030 


104424 




8976 031032 


104513 




8977 


031034 


105037 


002264 


8978 031040 








031040 


010102 






031042 


005202 




8979 


031044 








031044 


012704 


000001 


8980 


031050 
031050 






8981 


031050 


105237 


002264 


8982 


031054 








031054 


012737 


000604 


8983 


031062 


104425 




8984 


031064 
031064 


010411 




89SS 


031066 


104503 




8986 


031070 








031070 


112712 


000377 


8987 


031074 


104426 




8988 


031076 


042737 


177757 


8989 031104 








031104 


023727 


002150 




031112 


001407 




8990 


031114 








031114 


012737 


000020 


8991 


031122 








031122 


013737 


002150 


8992 031130 


104060 




8993 031132 








031132 






8994 


031132 


104513 




8995 


031134 


005711 




8996 


031136 


104426 




8997 


031140 


042737 


174037 


8998 


031146 








031146 


023727 


002150 




031154 


001412 




8999 


031156 








031156 


012737 


177777 


9000 


031164 








031164 


012737 


000300 


9001 


031172 








031172 


013737 


002150 


9002 


031200 


104061 




9003 


031202 
031202 






9004 


031202 


005302 
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MTP043: SUBTST <<MTP043 URITE BYTE CLEARS SINGLE BIT ERROR TEST>> 
:*SUBTEST nTP043 URITE BYTE CLEARS SINGLE BIT ERROR TEST 

THIS TEST CHECKS TO SEE IF A SINGLE BIT ERROR UILL BE CORRECTED DURING 
THE READ PORTION OF A WRITE BYTE AND THAT THE CORRECT CHECK BITS UILL 
BE GENERATED ON A URITE. 



002150 



002150 
000020 

002044 
002052 



002150 
000300 

002612 
002044 
002052 



CACHOFF 
CBREG 

CLRB PASFLG 
LET R2 := Rl 



#1 



LET R4 
REPEAT 



;= #1 



INCB PASFLG 
LET CSR := #604 



LOADCSR 
LET (Rl) 

CLRICSR 
LET CR2) 



= R4 



:B» #377 



REAOCSR 

BIC #tC20,CSR 

IF CSR NE #20 



LET GOOD #20 
LET BAD := CSR 
ERROR *60 

END 

CBREG 
TST (Rl) 
READCSR 

BIC #tC3740.CSR 
IF CSR NE #300 

SET HEADER 
LET GOOD #300 
LET BAD := CSR 
ERROR *61 

END 

DEC R2 



TURN OFF CACHE 

ENABLE CHECK/SYNDROME BIT REGISTER 

CLEAR LOOP COUNTER 

R2 POINTS TO HIGH BYTE 

MOV R1.R2 
INC R2 

INITIAL DATA = 1 

MOV #1.R4 



B47: 



INCREMENT LOOP COUNTER 
URITE CHECK BITS CORRESPONDING TO DATA OF 0 

MOV #604. CSR 

WRITE CSR 

WRITE DATA OF 1 CREATING A SINGLE BIT ERROR 

MOV R4.(R1) 

WRITE CSR TO NORMAL MODE 
URITE BYTE OF WORD 



READ CSR 

SEE IF SBE INDICATOR IS SET 
IS SBE SET????? 



MOVB #377. (R2) 

CMP CSR. #20 
BEQ L276 

MOV #20. GOOD 

MOV CSR. BAD 



L276:::::s; 

; WRITE CSR TO DIAG MODE 

;READ SAO FOR CORRECT CHECK BITS 

'READ CSR 

I MASK OUT CHECK BIT FIELD 

;UERE CORRECT CHECK BITS GENERATED????? 

CMP CSR. #300 
BEQ L277 

MOV #-1. HEADER 

MOV #300. GOOD 

MOV CSR. BAD 



SEQ 0253 



L277:;; 

POINT TO HIGH BYTE AND REPEAT 



14 
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9005 031204 
031204 

9006 031210 
031210 
031216 
031220 

9007 031220 

9008 031222 



012704 

123727 
001314 

104423 
000207 



000400 
002264 



000002 



LET R4 := *400 
UNTILB PASFLG EQ «2 



CACHON 
RETURN 



sBIT 0 OF HIGH BYTE 
;D0 HIGH AND LOU BYTE 

:TURN ON CACHE 



E47: 



SEQ 0254 



MOV 0400, R4 

CMPB PASFLG. 02 
BNE B47 



J4 
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SEQ 0255 



9010 031224 



9011 
9012 
9013 
9014 
9015 
9016 

9017 031224 
031224 

9018 031224 

9019 031226 
031226 

9020 031232 
031232 

9021 031236 

9022 031240 
031240 

9023 031244 
031244 

9024 031244 
031244 

9025 
9026 

9027 031250 
031250 

9028 031254 
031254 

9029 031254 
031254 

9030 031260 
031260 

9031 031262 
031262 

9032 031266 

9033 031270 
031270 

9034 031272 

9035 031274 

9036 031276 

9037 031300 

9038 031302 

9039 031304 
031304 

9040 031310 

9041 031312 

9042 031314 
031314 

9043 031320 

9044 031324 
031324 
031326 

9045 031330 
031330 

9046 031334 



104424 

105037 

012705 
104475 



002264 
174037 



012702 000046 



105237 002264 



005037 002266 



005237 

010204 

010237 
104425 

005011 
005105 
010546 
040416 
040504 
052604 

010437 
104425 
104426 

013703 
042703 

020304 
001412 



002266 



002150 



002150 



002150 
020000 



MTP044: SUBTST <<MTP044 SHIFTING CHECK BITS THROUGH THE CSR TEST>> 

♦SUBTEST MTP044 SHIFTING CHECK BITS THROUGH THE CSR TEST 

******************************************************************************* 

THIS TEST CHECKS THE ABILITY TO READ AND WRITE CHECKBITS INTO MEMORY 
BY SHIFTING A ONE BIT THROUGH A FIELD OF ZEROS. THE CSR IS READ FOR THE 
CORRECT PATTERNS. THE TEST IS THEN REPEATED ON A ZERO BIT THROUGH A 
FIELD OF ALL ONES. 



REPEAT 

CACHOFF 
LET PASFLG 



LET R5 

CBICSR 
LET R2 



B= #0 
0174037 

«46 



REPEAT 

LET PASFLG :B» PASFLG 



«0 



«1 



LET PASSNO 
REPEAT 

LET PASSNO :» PASSNO ♦ #1 
LET R4 := R2 
LET CSR R2 



LOADCSR 
LET (Rl) 



#0 



COM R5 

MOV R5.-(SP) 
BIC R4,(SP) 
BIC R5.R4 
BIS (SP)*.R4 
LET CSR := R4 



LOADCSR 
READCSR 
LET R3 : 



= CSR 



010137 002034 



BIC #BIT13.R3 
IF R3 NE R4 THEN 



LET ADDRESS := Rl 
LET GOOD := R4 



:ILCi ;REV B 



B50: 



;TURN OFF CACHE 
:INIT PASFLG 

CLRB PASFLG 

: CHECK BIT MASK FOR CSR 

MOV #174037, R5 
; ENABLE CHECK/SYNDROME BIT REGISTER 
:SET UP INITIAL CSR DATA 

MOV 946. R2 

B51: 

:INC LOOP COUNTER 

INCB PASFLG 

sCHK BITS -- 1 

: DISABLE ECC:DIAG CHK SET 

;INIT PASSNOC INNER LOOP COUNTER) 

CLR PASSNO 

B52:ii:i;i 
;INC LOOP COUNTER 

INC PASSNO 

;COPY R2 TO R4 

MOV R2.R4 
jGET CSR DATA TO BE WRITTEN 

MOV R2.CSR 
; WRITE SBE CHECK BITS TO CSR 
; WRITE DATA AND CHECK BITS AT A-0 

CLR (Rl) 

{COMPLEMENT MASK 
sSAVE R5 ON STACK 
{CREATE AN XOR FUNCTION 



MOV R4.CSR 
{LOAD CSR WITH COMPLEMENT CHECK BITS 
{READ CSR FOR COMPLEMENT CHECK BITS 
{COPY CSR DATA TO R3 

MOV CSR R3 

{CLEAR ANY POSSIBLE INHIBIT MODE POINTER 
{READ CSR FOR PROPER CHECK BITS 

CMP R3.R4 
BEQ L301 

' MOV Rl. ADDRESS 



K4 



CVMJAAO MSVll-J MEMORY DIAG. MACRO VOS.Olb Friday 15-Feb-85 16:10 Page 
MTP044 SHIFTING CHECK BITS THROUGH THE CSR TEST 





031334 


010437 


002044 


9047 


031340 








031340 


010337 


002052 


9048 


0313-»4 








031344 


012737 


177777 


9049 031352 


104463 




9050 


031354 
031354 






9051 


031354 


005105 




9052 


031356 


005711 




9053 


031360 


000240 




9054 


031362 


104426 




9055 


031364 


040537 


002150 


9056 


031370 
031370 


010204 




9057 


031372 


040504 




9058 


031374 








031374 


020437 


002150 




031400 


001413 




9059 


031402 








031402 


010437 


002044 


9060 


031406 








031406 


013737 


002150 


9061 


031414 








031414 


010137 


002034 


9062 


031420 








031420 


012737 


177777 


9063 


031426 


104464 




9064 


031430 
031430 






9065 


031430 


040502 




9066 


031432 








031432 


123727 


002264 




031440 


001002 




9067 








9068 


031442 


006302 




9069 


031444 
031444 
031446 


000413 




9070 


031446 


005105 




9071 


031450 


010546 




9072 


031452 


040216 




9073 


031454 


040502 




9074 


031456 


052602 




9075 


031460 


006302 




9076 


031462 


010546 




9077 


031464 


040216 




9078 


031466 


040502 




9079 051470 


052602 




9060 031472 


005105 




9061 


031474 
031474 






9082 


031474 








031474 


062702 


000006 


9083 


031500 








031500 


123727 


002266 




031SU6 


001262 





002612 



002052 



002612 



000001 



LET BAD :» R3 
SET HEADER 
PERR37 

END 

COM R5 
TST (Rl) 
NOP 

READCSR 
BIC R5.CSR 
LET R4 := R2 

BIC R5.R4 
IF R4 NE CSR 

LET GOOD := R4 
LET BAD :« CSR 
LET ADDRESS := Rl 
SET HEADER 
PERR40 

END 

BIC R5,R2 

IFB PASFLG EQ #1 



ASL R2 
ELSE 



COM 
MOV 
BIC 
BIC 
BIS 
ASL 
MOV 
BIC 
BIC 
BIS 
COM 
END 



R5 

R5.-CSP) 

R2.(SP) 

R5.R2 

(SP)».R2 

R2 

R5.-(SP) 

R2.(SP) 

R5.R2 

(SP)*.R2 

R5 



000006 



LET R2 :« R2 ♦ 06 
UNTILB PASSNO EQ «6 



SEQ 0256 

MOV R4.G00D 

MOV R3,BAD 

MOV 0-1, HEADER 
ERROR CALL ::ILC:iREVB 

L301 ::::::: 

COMPLEMENT MASK 

READ CHECK BITS AT A«0 INTO CSR 

READ CSR FOR CORRECT CHECK BITS 

MASK OUT CHECK BIT FIELD 

GET CHECK BITS THAT WERE WRITTEN 

MOV R2.R4 
MASK OUT CHECK BIT FIELD 
ARE CHECK BITS THE SAME? 

CMP R4,CSR 

BEQ L302 

MOV R4.G00D 

110V CSR. BAD 

MOV Rl. ADDRESS 

MOV ft -1. HEADER 
ERROR CALL ::ILC:sREVB 



• • t • I ■ • ff 



L302: 

; SHIFT CHECK BITS AND CREATE NEW DATA FOR CSR 
! SELECT FUNCTION 

CMPB PASFLG. #1 

BNE L303 
DO A FIELD OF ZEROS- -->0NES 
SHIFT CHECK BITS 
DO A FIELD OF ONES --->ZER0S 

BR L304 
L303:::;:ii 

TAKE OUT CHECK BIT FIELD 



SHIFT CHECK BITS 

PUT BACK CHECK BIT FIELD 



COMPLEMENENT DATA PATTERN 
L304:::,::i 

:ADD 6 SO THAT WRITE ON CSR WILL ENABLE DIAG MODE 

ADD «6,R2 

sDO ALL CHECK BITS 

CMPB PASSNO, »6 
BNE B52 



L4 
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031510 
90a4 031510 
031510 
9085 031514 
031514 
031522 
031524 
9006 031524 

9087 031526 

9088 031530 

9089 031534 
031534 
031540 
031542 

9090 031542 

9091 031544 



012702 

123727 
001250 

104503 
005011 
062701 

020137 
001231 

104423 
000207 



003706 
002264 

000100 
002562 



000002 



LET R2 #3706 
UNTILB PASFLG EQ «2 



CLRICSR 
CLR (Rl) 
ADD «100,R1 
UNTIL Rl EQ ENOADO 



CACHON 
RETURN 



SEQ 0257 



E52 

.-REPEAT UITH FIELD OF'oNES 

MOV «3706.R2 



E51: 



CMPB PASFLG, #2 
BNE B51 



:ALL 256 TO ADDRESS 



:TURN ON CACHE 



E50: 



:ILC: iREVB 
:ILC: sREVB 

CMP Rl.ENDAOO 

BNE BSO 



M4 
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9093 031546 



9094 
9095 
9096 
9097 
9098 
9099 
9100 
9101 
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MTP045: SUBTST <<MTP045 SYNDROMES TO CSR ON DOUBLE BIT ERROR TEST>> 

! •SUBTEST MTP045 SYNDROMES TO CSR ON DOUBLE BIT ERROR TEST 

:*************************************«***************************************** 

THIS TEST CHECKS TO SEE IF THE DOUBLE BIT ERROR INDICATOR IS SET 
ON A DOUBLE BIT ERROR AND THE CORRECT SYNDROMES ARE LATCHED INTO THE 
CSR. THIS TEST IS THEN REPEATED UITH MULTIPLE ERROR CHECK/SYNDROME BITS 



SEQ 0258 



9102 

9103 

9104 

9105 
9106 
9107 

9108 
9109 
9110 
9111 



9112 

9113 

9114 
9115 

9116 
9117 
9118 
9119 
9120 



9121 

9122 

9123 
9124 

9125 
9126 

9127 

9128 



031546 

031550 

031552 

031552 

031556 

031556 

031564 

031564 

031572 

031572 

031572 

031576 

031600 

031600 

031602 

031604 

031606 

031610 

031610 

031616 

031620 

031620 

031626 

031626 

031634 

031636 

031636 

031636 

031640 

031642 

031644 

031652 

031652 

031660 

031662 

031662 

031670 

031670 

031676 

031700 

031700 

031700 

031702 

031702 

031710 

031710 

031716 

031716 



104424 
104513 

005037 

012737 

01 : 737 



005237 
104425 

005011 
104503 
005711 
104426 

032737 
001007 

012737 

013737 
104063 



104514 
104426 
000240 
042737 

023737 
001407 

013737 

012737 
104042 



OOSOU 
012737 
012737 
023727 



002266 
003744 
003144 

002266 



002044 
002150 



100000 002150 



177777 
002150 



002612 
002052 



174033 
002150 

002150 
177777 



003604 
003004 

002266 



002150 
002044 

002052 
002612 



002044 

002150 
000002 



CACHOFF 
CBREG 

LET PASSNO 
LET GOOD 
LET CSR 
REPEAT 



:= 90 
»3744 
03144 



INC PASSNO 
LOADCSR 
LET (Rl) :• 



»0 



CLRICSR 
TST (Rl) 
READCSR 

IF 0BIT15 OFF. IN CSR 



SET HEADER 
LET BAD CSR 
ERROR *63 

END 

SYNREG 

READCSR 

NOP 

SIC #tC3744.CSR 

IF CSR NE GOOD THEN 

LET BAD := CSR 
SET HEADER 
ERROR *42 

END 

CLR (Rl) 

LET GOOD :* «3604 
LET CSR »3004 
UNTIL PASSNO EQ 02 



sTURN OFF CACHE 

; ENABLE CHECK/SYNDROME BIT REGISTER 
} CLEAR LOOP COUNTER 

CLR PASSNO 

;GOOD DATA 

MOV 03744. GOOD 

:DBE CHECK BITS FOR CSR 

MOV 03144. CSR 



B53: 



s WRITE DBE CHECK BITS TO CSR 
sURITE ZEROS AND DBL ERROR CHK BITS A>0 

CLR (Rl) 

! CLEAR CSR OUT 

sREAD A>0 TO GET DOUBLE BIT ERROR 
iUAS ONCORRECABLE ERROR BIT SET??? 



;BIT NOT SET 



BIT 0BIT15.CSR 
BNE L310 

MOV 0-1. HEADER 

MOV CSR. BAD 



L310: 

; ENABLE SYNDROME BIT REGISTER 

;READ CSR FOR CORRECT SYNDROME BITS 

{DEBUG AIDE 

sMASK SYNDROMES OUT 

; CHECK IF DOUBLE ERROR BIT IS SET 

CMP CSR. GOOD 
BEQ L311 

BAD DATA 

MOV CSR. BAD 
MOV 0-1. HEADER 



L311: :::::: 

CLEAR LUT 

REPEAT UITH MULTIPLE ERROR SYNDROMES 

MOV 03604. GOOD 

MULTIPLE ERROR CHECK BITS 

MOV 03004. CSR 



CMP PASSNO. 02 



N4 
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SEQ 0259 



031724 
031726 

9129 031726 

9130 031730 

9131 031732 



001322 

104503 
104423 
000207 



CLRICSR 

CACHON 

RETURN 



E53: 



BNE 853 



B5 
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SEO 0260 



9133 031734 



9134 
9135 
9136 
9137 
9138 

9139 031734 

9140 031740 

9141 031742 
031742 

9142 031742 
031742 

9143 031746 

9144 031750 

9145 031754 

9146 031756 
031756 

9147 031756 
031756 

9148 031762 
031762 

9149 031766 
031766 

9150 031774 
031774 

9151 032000 
032000 
032006 

9152 032010 
032010 

9153 032014 
032014 
032016 

9154 032016 
032016 

9155 032022 
032022 

9156 032022 
032022 

9157 032022 
032022 

9158 032026 

9159 032032 
032032 

9160 032034 
032034 

9161 032040 

9162 032044 

9163 032050 
032050 

9164 032054 

9165 032056 
032056 

9166 032060 



005037 
104424 



005237 
005000 
105037 
104513 



105237 

012704 

012737 

005037 

123727 
001003 

012705 

000402 



002266 

002266 
002264 

002264 
177777 
000001 
002324 
002264 

000001 



012705 177776 



005037 
005237 

005204 

116402 

072227 
052702 

010237 
104425 

010011 



002072 
002324 



030276 
000005 
000006 

002150 



MTP046: SUBTST <<MTP046 CHECK SINGLE BIT ERRORS UITH ECC DISABLED>> 

******************************************************************************* 

•SUBTEST MTP046 CHECK SINGLE BIT ERRORS UITH ECC DISABLED 



002076 



000001 



THIS TEST CHECKS TO SEE THAT FOR EACH BIT OF A DATA UORD THAT A SBE 
IS TREATED LIKE A UNCORRECTABLE ERROR UITH ECC DISABLED AND TRAPS 
ARE DETECTED. 



CLR PASSNO 
CACHOFF 
REPEAT 

LET PASSNO PASSNO * «1 

CLR RO 
CLRB PASFLG 
CBREG 
REPEAT 

LET PASFLG :B= PASFLG 

LET R4 :« 0-1 

LET NOPAR :» #1 

LET BITNO :» #0 

IFB PASFLG EQ *1 



»1 



LET R5 
ELSE 



91 



LET R5 :■ #177776 

END 
REPEAT 

LET PARCNT 



«0 



INC BITNO 
LET R4 :- R4 



* »1 

LET R2 :B- PTABLE(R4) 

ASH «5.R2 

BIS «BIT2!BIT1.R2 

LET CSR R2 

LOAOCSR 

LET (Rl) :« RO 
IF PASSNO EQ *1 



CLEAR OUTER LOOP COUNTER 
TURN O^F CACHE 



B54: 



INC PASSNO 

CLEAR DATA 
CLEAR PASFLG 

ENABLE CHECK/SYNDROME BIT REGISTER 

BSS:::;::: 
INCREMENT LOOP COUNTER 

INCB PASFLG 
INDEX TO SINGLE BIT ERROR TABLE 

MOV #-l.R4 

ENABLE PARITY ACTION 

MOV #1. NOPAR 
CLEAR INNER LOOP COUNTER 

CLR BITNO 

SELECT DATA TO BE CORRECTED BY PASSNO 

CMPB PASFLG. #1 
BNE L313 

:DATA=0:BIT TO BE CORRECTED IS A ONE 

MOV »1.R5 

BR i.314 

DATA«177776!BIT TO BE'cORRECTED IS A ZERO 

MOV #177776. R5 



L314: 



B56: :::::: 
CLEAR PARITY COUNTER 

CLR PARCNT 

INCREMENT BIT POINTER 
POINT TO NEXT SET OF CHECK BITS 

INC R4 

jGET NEXT SET OF CHECK BITS 

MOVB PTABLE(R4),R2 

{SHIFT TO LINE UP IN CSR 

i ENABLE DIAG MODE 

:GET CHECK BITS TO BE WRITTEN 

MOV R2.CSR 

;LOAD CSR UITH DATA 

s WRITE DATA TO TEST ADDRESS 

MOV RO.(Rl) 

: WRITE CSR 



C5 
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Page 



032060 
032066 

9167 032070 

9168 032072 
032072 
032074 

9169 032074 

9170 032076 
032076 

9171 032076 

9172 032100 

9173 032104 

9174 032106 
032106 
032114 

9175 032116 
032116 

9176 032124 
032124 

9177 032132 

9178 032134 
032134 

9179 032134 

9180 032136 

9181 032140 
032140 
032146 

9182 032150 

9183 032152 
032152 
032154 

9184 032154 

9185 032156 

9186 032160 
032160 

9187 032160 
032160 
032166 
032170 

9188 032170 

9189 032172 
032172 
032200 
032202 

9190 032202 
032202 
032210 
032212 

9191 032212 

9192 032214 

9193 032216 
9194 

9195 

9196 032220 
032220 
032226 

9197 032230 



023727 
001002 
104471 

000401 

104507 



005711 
004737 
104426 

032737 
001007 



002266 000001 



032220 



100000 002150 



013737 002150 002052 

012737 177777 002612 
104045 



104503 
005011 

123727 
001002 
006305 

000402 

000261 
006105 



023727 
001315 

005100 

123727 
001266 



023727 
001254 

104503 
104423 
000207 



023727 
001011 



002264 000001 



002324 000020 



002264 000002 



002266 000002 



002266 000001 



ECCIDIS 
ELSE 



ENAISBE 

END 

TST (Rl) 
CALL CHKTRP 
READCSR 

IF #BIT15 OFF. IN GSR 



LET BAD CSR 
SET HEADER 
ERROR *45 

END 

CLRICSR 
CLR (Rl) 

IFB PASFLG EQ »1 



ASL R5 
ELSE 



SEC 

ROL R5 

END 

UNTIL BITNO EQ #16. 



COM RO 
UNTILB PASFLG EQ #2 



UNTIL PASSNO EQ 92 



CLRICSR 

CACHON 

RETURN 



CHKTRP: IF PASSNO EQ «1 



IF PARCNT EQ 91 



SEQ 0261 



CMP PASSNO. «1 
BNE L315 

{FIRST PASS :ECC DISABLE. NO PEL 

BR L316 

.SECOND PASS iECC DISABLE i^BL ENABLED 



L316:::;:i: 

; CORRECT SBE 

; CHECK FOR CORRECT TRAP 

5 READ THE CSR FOR UNCORRECTABLE ERROR 

sis UNCORRECTABLE ERROR BIT SET???? 

BIT WIT15.CSR 

BNE L317 

MOV CSR. BAD 

MOV «-l. HEADER 



L317: 



: CLEAR LUT 

s SHIFT NEU DATA DEPENDING ON PASFLG 

CMPB PASFLG. «1 
BNE L320 

: SHIFT BITNO TO THE LEFT 

BR L321 
L320:i::::: 

:SET CARRY BIT AND 

5 ROTATE LEFT 

L321: :::::: 
: UNTIL ALL BITS ARE DONE 

CMP BITNO. #16. 
BNE B56 

s COMPLEMENT DATA AND 'REPEAT 
s UNTIL 2 PASSES ARE COMPLETE! 

CMPB PASFLG. #2 



BNE B55 



CMP PASSNO. «2 
BNE 054 



E55: 
E54: 

TURN CACHE 



;PASS 1 CHECK FOR NO TRAP 

CMP PASSNO. 01 
BNE L325 



D5 
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MTP046 
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9199 
9200 

9201 



9202 

9203 

9204 
9205 

9206 

9207 



032230 
032236 
032240 
032240 
032246 
032250 
032250 
032250 
032250 
032252 
032252 
032252 
032260 
032262 
032262 
032270 
032272 
032272 
032272 
032272 
032272 



023727 002072 000001 
001004 

012737 177777 002612 
104057 



000410 



023727 002072 000001 
001404 

012737 177777 002612 
104064 



END 
ELSE 



SET HEADER 
ERROR *57 



IF PARCNT NE #1 



000207 



END 

END 

RETURN 



SET HEADER 
ERROR «64 



SEQ 0262 

CMP PARCNT. 01 
BNE L326 

MOV 0-1. HEADER 

L326::::::: 

BR L327 
L325:s::::: 

CMP PARCNT. 01 
BEQ L330 

MOV 0-1, HEADER 



L330 
L327 



E5 
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MTP046 CHECK SINGLE BIT ERRORS UITH ECC DISABLED 



SEQ 0263 



9209 032274 



9210 
9211 
9212 
9213 
9214 

9215 032274 

9216 032276 
032276 

9217 032302 

9218 032306 

9219 032312 

9220 032316 

9221 032320 
032320 

9222 032326 

9223 032330 
032330 

9224 03?332 
03<;332 

9225 032340 

9226 032342 
032342 

9227 032344 

9228 032346 

9229 032350 

9230 032352 

9231 032360 
032360 
032364 

9232 032366 
032366 

9233 032374 
032374 

9234 032400 
032400 

9235 032406 

9236 032410 
032410 

9237 032410 

9238 032414 

9239 032416 

9240 032420 

9241 032426 
032426 
032432 

9242 032434 
032434 

9243 032442 
032442 

9244 032446 
032446 

9245 032454 

9246 032456 



104424 

013704 
072427 
042704 
052704 
104513 

012737 
104425 

005011 

012737 
104425 

005012 
104503 
005711 
104426 
042737 

023704 
001411 

013737 

010437 

012737 
104063 



052704 
005712 
104426 
042737 

023704 
001411 

013737 

010437 

012737 
104051 



M7P047: SUBTST <<M1P047 NO CSR UPDATE ON SBE UITH EXSISTING DBE>> 

:*SUBTEST nTP047 NO CSR UPDATE ON SBE UITH EXSISTING DBE 

: ******************************************************************************* 

THIS TEST CHECKS TO SEE THAT THE CSR CONTENTS MILL NOT CHANGE 
UITH A SINGLE BIT ERROR UHEN A DOUBLE BIT ERROR ALREADY 
EXISTS. 



002102 
000011 
170037 
100000 



003144 002150 



000104 002150 



020000 
002150 

002150 
002044 
177777 

000020 

020000 
002150 

002150 
002044 
177777 



002150 



002052 



002612 



002150 



002052 



002612 



CACHOFF 

LET R4 BANK 

ASH »9..R4 
BIC #tC7740.R4 
BIS «BIT15,R4 
CBREG 

LET CSR := #3144 



LOADCSR 
LET (Rl) 

LET CSR := 

LOADCSR 
LET CR2) 



;= #0 
= <M04 

;= #0 



CLRICSR 
TST (Rl) 
READCSR 

BIC 0BIT13.CSR 
IF CSR NE R4 



LET BAD CSR 
LET GOOD R4 
SET HEADER 
ERROR *63 

END 

BIS «20.R4 
TST (R2) 
READCSR 

BIC #BIT13.CSR 
IF CSR NE R4 

LET BAD CSR 
LET GOOD R4 
SET HEADER 
ERROR *51 

END 



iTURN OFF CACHE 
:GET BANK NUMBER 

MOV BANK.R4 

; SHIFT INTO PLACE 

5 MASK OUT UNUANTED BITS 

:SET UP GOOD DATA 

i ENABLE CHECK/SYNDROME BIT REGISTER 
iCHFCK BITS FOR DOUBLE BIT ERROR 

MOV 03144. CSR 



; WRITE DBE CHECK BITS 
;URITE SBE CHECK BITS 



CLR (Rl) 
MOV «104.CSR 



:URITE SBE CHECK BITS AT ADDRESS * 4K 

CLR (R2) 

; CLEAR CSR 

;READ DBE LOCATION 

;READ FOR CSR QBE INDICATOR 

! CLEAR INHIBIT MODE POINTER 

CMP CSR.R4 
BEQ L331 

MOV CSR. BAD 

MOV R4.G00D 

MOV 0-1. HEADER 

» 

L331: 

J SET BIT IN GOOD DATA 
;REAO SBE 

:REAO CSR FOR NO CHANGE 

: CLEAR INHIBIT MODE POINTER 

CMP CSR.R4 
BEQ L332 

MOV CSR. BAD 

MOV R4.G000 

MOV ft -1. HEADER 



CVMJAAO MSVll-J MEMORY 01 AG. 

MTP047 NO CSR UPDATE ON SBE WITH EXSISTING DBE 
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SEQ 0264 



032456 

9247 032456 

9248 032460 

9249 032462 

9250 032464 

9251 032466 



104503 
005011 
005012 
104423 
000207 



CLRICSR 
CLR (Rl) 
CLR (R2) 
CACHON 
RETURN 



CLEAR 1 CSR 



TURN ON CACHE 



L332:;:::ji 



CVMJAAO MSVll-J hEMORY DIAG, 
MISC SUBROUTINES 

9253 
9254 

9255 032470 



9256 032470 

9257 032472 

9258 032474 

9259 032476 
9260 

9261 032500 



9262 

9263 
9264 
9265 
9266 
9267 
9266 
9269 
9270 
9271 
9272 
9273 
9274 



9275 
9276 
9277 
9278 
9279 
9280 
9281 
9282 
9283 
9284 
9285 

9286 



032500 
032500 
032502 
032506 
032514 
032522 
032524 
032532 
032534 
032542 
032544 
032546 
032552 
032554 
032554 
032556 
032560 
032562 
032566 
032572 
032574 
032600 
032604 
032610 
032614 
032620 
032624 
032624 
032626 



010004 
010103 
010205 
000207 



010046 
005237 
042737 
022737 
001414 
022737 
001413 
022737 
001414 
005000 
013704 
000414 

005000 
005004 
000411 
012700 
013704 
000404 
012700 
012704 
010037 
010037 
010037 
010037 

012600 
000207 



G5 
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.SBTTL mSC SUBROUTINES 

REGCOPY:SUBTST <<SUBR COPY RO TO R4,R1 TO R3, £ R2 TO R5>> 

; ♦SUBTEST SUBR COPY RO TO R4.R1 TO R3. 6 R2 TO R5 

nOV R0.R4 
MOV R1.R3 
MOV R2.R5 
RETURN 

FLIPUARN:SUBTST <<FLIP WARNING CONSTANTS IN WORST CASE NOISE TESTS>> 

{♦SUBTEST FLIP WARNING CONSTANTS IN WORST CASE NOISE TESTS 

: ******************************************************************************* 



SEQ 0265 



002616 
177774 
000001 

000002 

000003 

002614 



000401 
002614 

000401 
000401 
024762 
024776 
025022 
025036 



002616 
002616 

002616 

002616 



2^ 



3$: 
4$: 



PUSH 

INC 
BIC 
CMP 
BEQ 
CMP 
BEQ 
CMP 
BEQ 
CLR 
MOV 
BR 

CLEAR 



BR 

MOV 

MOV 

3R 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

POP 

RETURN 



RO 

FLIPLOC 
#tC3,FLIPL0C 
#1. FLIPLOC 
U 

#2. FLIPLOC 
2$ 

#3, FLIPLOC 

3$ 

RO 

0NES.R4 
4$ 

R0,R4 



4$ 

0401. RO 
0NES.R4 
4$ 

0401. RO 

0401. R4 

R0.WARN2 

R0.WARN3 

R0.WARN4 

RO. WARNS 

RO 



MOV RO. (SP) 



CLR 
CLR 



RO 
R4 



MOV (SP)*.RO 



H5 
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SEQ 0266 



9288 032630 



9289 

9290 032630 

9291 032632 

9292 032636 

9293 032642 

9294 032650 

9295 032656 

9296 032662 

9297 032670 

9298 032672 
9299 



104415 
012700 
012701 
012737 
012737 
004737 
012737 
104416 
000207 



060000 
040000 
000207 
024640 
024446 
000240 



BACKGNO:SUBTST <<SUBR WRITE BACKGROUND>> 

;**************«*****************************«*«**************************««**** 

i*SUBTEST SUBR WRIiE BACKGROUND 

; ******************************************************************************* 

; WRITES DATA FROM R2 



024644 
002262 

024644 



SAVREG 
MOV 
MOV 
MOV 
MOV 
CALL 
MOV 

RESREG 
RETURN 



#FIRST,RO 

«SIZE.R1 

#2C7.MTP000*4 

OMTPOOO.SUPDOADD 

SUPD03 

«240,MTP000*4 



iWARNING PUTTING "RETURt;" AFTER WRITE 



s RESTORE 'NOP' AFTER WRITE 



CVMJAAO MSVll-J MEMORY OIAG. 
SUBR URITE BACKGROUND 

9301 032674 
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GETCSR: SUBTST <<SUBR GET CSR INFORMATION FROM CONFIGURATION TABLE>> 

************ f *************************** f**************^ 

;*SUBTEST SUBR GET CSR INFORMATION FROM CONFIGURATION TABLE 

;******************************************************************************* 



GET INDEX INTO CONFIG TABLE 
MOV IT INTO R3 



SEQ 0267 



9302 








! INPUTS 


: NONE 


9303 












9304 








i OUTPUT 


: CSRNO " CSR 


9305 












9306 


032674 


013702 


002104 


MOV 


BANKIN0EX,R2 


9307 


032700 


016203 


002664 


MOV 


C0NFIG(R2).R3 


9308 


032704 


000303 




SUA6 


R3 


9309 


032706 


006303 




ASL 


R3 


9310 


032710 


042703 


177741 


BIC 


#tC36.R3 


9311 


032714 


010337 


002152 


MOV 


R3.CSRNQ 


9312 


032720 


000207 




RETURN 





CLEAR OFF SOME BITS 
SAVE CSR NUMBER 
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SU8R GET CSR INFORMATION FROM CONFIGURATION TABLE 



J5 

10 Page 



292 



SCO 0268 



9315 032722 



PCONFIG:SUBTST <<SUBR PRINT CONFIGURATION MAP>> 

: ♦SUBTEST SUBR PRINT CONFIGURATION MAP 

i *********************************************************** 



9316 032722 








PUSH 


TKVEC.TKVEC+2.R0 




032722 


013746 


000060 






MOV 


032726 


013746 


000062 








MOV 


032732 


010046 










MOV 


9317 032734 


010637 


033334 




MOV 


SP.PCONFS 


;SAVE LAST GOOD SP 


9318 032740 


012737 


033302 


000060 


MOV 


#PC0NF2.TKVEC 


9319 032746 


012737 


000340 


000062 


MOV 


#340.TKVEC*2 




9320 032754 


017700 


147664 




MOV 


a*TKB,RO 


;KILL ANY OLD INTERRUPT 


9321 032760 


042737 


000200 


177776 


SIC 


*BIT7,PSU 


SLOWER CPJ PRIORITY TO 140 


9322 032766 


052777 


000100 


147646 


BIS 


#BIT6.S$TI<S 


; ENABLE KE^bOARD INTERRUPTS 


9323 














9324 032774 








TYPE 


MSGOOl 




032774 


104401 


065123 




TYPEIT 
.DSABL 


.MSGOOl 
CRF 




9325 033000 








TYPE 


MSG002 




033000 


104401 


065205 




TYPEIT 
. DSABL 


.MSG002 
CRF 




9326 033004 








TYPE 


MSG003 




033004 


104401 


065262 




TYPEIT 
.DSABL 


. MSG003 
CRF 




9327 033010 


022737 


000060 


002556 


CMP 


#60,LASTBANK 




9326 033016 


002006 






BGE 


NOOJ 




9329 








;IF FAT 


PAPER ON TERMINAL 


GOTO \% 


9330 033020 








IF #SU4 


SET. IN SSUR THEN 


JUMPTO PCONFl 


033020 


032777 


000020 


147610 






BIT 


033026 


001402 










BEQ 


033030 


000137 


033242 








JMP 


033034 














9331 033034 


012700 


000074 


NOOJ: 


MOV 


#60. ,R0 




9332 033040 


010004 






MOV 


R0,R4 




9333 033042 








CLEAR 


R1.R3 




033042 


OOSOOl 










CLR 


033044 


005003 










CLP 


9334 033046 








TYPE 


MSG004 




033046 


104401 


065367 




TYPEIT 
.DSABL 


, MSG004 
CRF 




9335 033052 


004737 


033336 




CALL 


TCONFIG 


;G0 TYPE CONFIGURATION (1ST 


9336 033056 


022737 


000060 


002556 


CMP 


060,LASTBANK 
PC0NF2 




9337 033064 


002106 






BGE 




9336 033066 








TYPE 


iCRLF 




033066 


104401 


002660 




TYPEIT 
. DSABL 


, iCRLF 
CRF 












TYDF 
1 Trt 






033072 


104401 


066076 




TYPEIT 
. DSABL 


.MSG017 
CRF 




9340 033076 








TYPE 


MSGllA 




033076 


104401 


065570 




TYPEIT 
.DSABL 


.MSGllA 
CRF 




9341 033102 








TYPE 


iCRLF 




033102 


104401 


002660 




TYPEIT 
.DSABL 


.JCRLF 
CRF 




9342 033106 








TYPE 


MSG017 


5 PRINT SPACE(S) 


033106 


104401 


066076 




TYPEIT 


.MSG017 





Rl 
R3 



I<5 
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SEQ 0269 











. DSABL 


CRF 


AVAV /\wa ■ ^ 

9343 033112 








TYPE 


MSGOll 


033112 


4 A4 il A 4 

104401 


AZ. C £ C£ 

065656 




TYPEIT 


.MSGOll 










.DSABL 


CRF 


9344 033116 








TYPE 


♦ CRLF 


033116 


4 Ail Jl A 4 

104401 


AA^C £ A 

002660 




TYPEIT 


, $CRLF 










.DSABL 


CRF 


9345 033122 








TYPE 


MSG017 


AW « 

033122 


4 A A Jl A « 

104401 


A^ £. AT £. 

066076 




TYPEIT 


,MSG017 










.DSABL 


CRF 


9346 Oddlcb 








T TPt 


nSb012 


033126 


■ Ail il A 1 

104401 


A£C^il il 

065744 




TYPtIT 


,nSG012 










AC ADI 


LKr 


9347 033132 


A1 ^^A1 

012701 


AAAT£ A 

000360 




nOv 


#60. *2*2, HI 


alii A AH 1 1£ 

9340 033136 


Al A 1 AT 
010103 






nOV 


Rl , R3 


9349 033140 


AAil ^T^ 

004 /3 f 


ATTTT^ 

033336 




LALL 


1 LUNr lb 


9350 033144 


022737 


AAA 1 ^A 

000170 


AA^CC^ MAA 11 

002556 NOO Jl : 


CnP 


Al ^A 1 ACTDAIkll/ 

wl70,LflSTBflNK 


9351 033152 


AA^ACT 

002053 






BGE 


PC0Nr2 


OTC^ ATT 1 Cil 

9352 033154 








T VDC 

1 Trt 


♦ LKLr 


ATT « 6il 

033154 


« Ail il A 1 

104401 


AA ^e.cf\ 
002660 




T VDCTT 


t ADI C 

, ♦CRLF 










AC ADI 


LKr 


OTCT ATTICA 

9353 033160 








TVDC 
1 Trt 




AT T 1 £A 

033160 


« Ail il A 1 

104401 


A££ A^^ 

06607O 




T VDCTT 


1 nbuOl ' 










nc AOI 


PDC 


OTCil ATTI^il 

9354 033164 








1 Trt 


MCr 1 1 D 

nabllD 


AT T 1 £il 

033164 


• Ail it A 1 

104401 


A^^Ail 1 

066041 




T VDCTT 

1 TrtI 1 


MCP 1 1 D 










nc ADi 


PDC 

LKr 


ATCC ATT17A 

9355 033170 








TVDC 
1 Trt 


tPDI C 
♦ LKLr 


AT T 1 7A 

033170 


« Ail it Al 

104401 


AA^CCA 

002660 




TVDCTT 
1 Trtl 1 


tPDI C 

, ♦LKLr 










nc ADi 


roc 
LKr 


OTC^ ATT 

9356 0331 r4 








TVPC 

1 irc 


MCCAI 7 


ATT 1 TF^ 

033174 


1 A^ ^ A 1 

104401 


ODDO rO 




TVDCTT 
1 irt J. 1 


• nsbOl ' 










DC AO| 


PDC 

LKr 


OTCTF ATT^AA 

9357 033200 








TVDC 
1 Trt 


nduiiL 


033200 


1 A^ ^ A 1 

104401 


A££ A^T 




TVDCTT 
1 Trt^ 1 


inSullL 










nc ADI 


roc 
LKr 


OTea ATT^A^ 

935S 033204 








1 TrC 


iroi P 

♦ CnLr 


AT T ^Ail 

033204 


• Ail il A 1 

104401 


AAOCCA 

002660 




TVDCTT 
1 Trtl 1 


troi c 

1 fLKLr 










nc ADI 


roc 
LKr 


OTCA ATT^IA 

9359 033210 








TVDC 
1 Trt 


MCRm 7 


ATT ^ 1 A 

033210 


1 A^ilAI 

104401 


0660 rO 




TVDCTT 
1 Trt J. 1 


MCftm 7 












OT&A ATT01A 
9360 033214 








1 Trt 


Mcr-i 1 n 
noul ID 


ATT O 1 A 

033214 


1 A^ ^ A 1 

104401 


0OD043 




TVDCTT 
1 Irti 1 


MCi-1 1 n 










nc ACII 


roc 
LKr 


OT£. 1 ATTO^A 

9361 033220 


A1 ^TFAI 
012 '01 


000 f 40 




nuv 


47An D1 


QTC^ ATT^Oil 

9362 033224 


A 1 A 1 AT 
010103 






nuv 


D1 DT 
Kl , 


OT^T ATTOO^ 

93o3 03322D 


Al ^7AA 

012 '00 


AAAA 1 A 

000010 




Mnw 
nuv 




OT£.il ATT^T^ 

9364 033232 


Al AAAil 
010004 






nuv 


DA OA 
KU , Kh 


OT^C ATT^Til 

9365 033234 


AAil TFT^ 
004 fit 


ATTTT^ 

03333d 




PAI 1 


1 LUNr lb 




AAAAPO 






RR 


r UwHii c 


9367 












9368 033242 


012700 


000170 


PCONFl: 


MOV 


0120. ,R0 


9369 033246 


010004 






MOV 


R0.R4 


9370 033250 








CLEAR 


R1.R3 


033250 


005001 










033252 


005003 











s PRINT SPACE(S) 



; PRINT SPACE(S) 



; PRINT SPACE(S) 



; PRINT SPACECS) 



CLR Rl 
CLR R3 



L5 



CVflJAAO MSVU 
SUBR PRINT 
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CONFIGURATION MAP 



SEQ 0270 



9371 033254 

033254 104401 066060 

9372 033260 

033260 104401 065656 



9373 033264 
033264 

9374 033270 
033270 



9375 
9376 
9377 
9378 
9379 
9380 
9381 



9382 
9383 
9384 



033274 
033300 

033302 
033306 
033314 
033320 
033320 
033322 
033326 
033332 



104401 065367 



104401 065744 

004737 033336 
000721 

013706 033334 PC0NF2: 

042777 000100 147326 

117700 147324 

012600 

012637 000062 

012637 000060 
000207 



033334 000000 



PCONFS: 



TYPE 

TYPEIT 

.DSABL 

TYPE 

TYPEIT 

.DSABL 

TYPE 

TYPEIT 

.DSABL 

TYPE 

TYPEIT 

.DSABL 

CALL 

BR 

MOV 
BIC 
MOVB 
POP 



RETURN 
0 



MSG014 

.MSG014 

CRF 

MSGOll 

.MSGOll 

CRF 

MSG004 

,MSG004 

CRF 

MSG012 

.MSG012 

CRF 

TCONFIG 
NOOJl 

PCONFS. SP 

«BIT6.a$TI<S 

a$TKB.R0 

R0,TKVEC*2.TI<VEC 



: SPACE 



i RESTORE STACK 

iREAD CHAR TO KILL FLAG 



MOV (SP)*.RO 

MOV (SP)».TKVEC«2 

MOV (SP)*.TKVEC 



.•STACK SAVED HERE! 



M5 



CVMJAAO MSVll 
SUeR PRINT 

9387 033336 



9388 
9389 
9390 
9391 
9392 
9393 
9394 
9395 
9396 
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CONFIGURATION MAP 



SEQ 0271 



SUBTST <<SUBR TYPE CONFIGURATION) > 
************************************************************************ 

♦SUBTEST SUBR TYPE CONFIGURATION 

******************************************************************************* 
******************************************************************************* 



CALL: 



MOV 

MOV 

MOV 

MOV 

CALL 

RETURN 



«N.RO 
R0,R4 
«K.R1 
R1.R3 
TCONFIG 



N^NUMBER OF CHARACTERS 
BACKUP 

INDEX CONSTANT 
BACKUP 
ACTUAL CALL 
ONLY RETURN 



******************************************************************************* 



9397 












;*********** 




9398 












;** ERROR ** 




9399 












;*********** 




9400 


033336 


012737 


000340 


177776 


TCONFIG 


:MOV 


«340.PSU 


; DISABLE INTERUPTS 


9401 


033344 










TYPE 


MSG005 




033344 


104401 


065475 






TYPEIT 
. DSABL 


,MSG005 
CRF 




9402 


033350 


032761 


000001 


002664 


1$: 


BIT 


OBITO.CONFIGCRl) 


i ERROR ON THIS BANK? 


9403 


033356 


001403 








BEQ 


2i 


;N0 - SKIP 


9404 


033360 










TYPE 


MSG013 


: PRINT "X" 




033360 


104401 


066056 






TYPEIT 
.DSABL 


.MSG013 
CRF 




9405 


033364 


000402 








BR 


3$ 




9406 


033366 








21: 


TYPE 


MSG014 


; PRINT SPACE 




033366 


104401 


066060 






TYPEIT 
.DSABL 


.MSG014 
CRF 




9407 


033372 


062701 


000004 




3$: 


ADD 


#4.R1 


J BUMP POINTER 


9406 


033376 


077014 








SOB 


RO.l* 


sLOOP I'k-TIL DONE 


9409 


033400 


010400 








MOV 


R4,R0 




9410 


033402 


010301 








MOV 


R3.R1 





cvnjAAo nsvii-j memory oiag. 

SUBR TYPE CONFIGURATION 
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SEO 0272 



9413 
9414 
9415 
9416 

9417 033404 012737 000340 177776 TCFIGl: 

9418 033412 112737 000040 066062 

9419 033420 

033420 104401 066062 



9420 



9421 
9422 
9423 
9424 
9425 
9426 
9427 



033424 

033424 005737 002372 

033430 001401 

033432 000207 
033434 

033434 010400 

033436 010301 



;**************** 

:** INTERLEAVE ** 

;***•****««****** 

sTHIS IS AN ENTRY POINT FROM ERROR REPORTS 
MOV *340.PSU ! DISABLE INTERUPTS 

nOVB «' .MSGOIS :MOVE A BLANK IN TO BE PRINTED 

TYPE MSGOIS 
TYPEIT . MSGOIS 
.DSABL CRF 

IF NOTAB NE «0 THEN IRETURN 



MOV 
MOV 



R4.R0 
R3.R1 



****************** 

;** MEMORY TYPE ** 

;***************** 

.ENABL LSB 



9428 033440 










TYPE 


MSG009 


033440 


104401 


065544 






TYPEIT 
.DSABL 


.MSG009 
CRF 


9429 033444 


033761 


002106 


002664 


TCFIG2 : 


BIT 


CPUBIT.CONFIG(Rl) 


9430 033452 


AA 4 d V ^ 

001432 








BEQ 


17$ 


9431 033454 


016105 


002666 






MOV 


C0NFIG«2(R1).R5 


9432 033460 


AAA VAC 

000305 








SUAB 


RS 


9433 033462 


042705 


177770 






BIG 


*tC7,R5 












CMP 


R5,« 


9435 033472 


003022 








BGT 


17$ 


9436 033474 










IF #BIT0 SET. IN RS 


033474 


032705 


000001 










033500 


001413 












9437 033502 










IF OBITl SET. IN R5 


033502 


03270i) 


000002 










033506 


001404 












9438 033510 


112737 


000120 


066062 




MOVB #'P, MSGOIS 


9439 033516 










ELSE 




033516 


000403 












033520 














9440 033520 


112737 


000105 


066062 




MOVB #'E. MSGOIS 


9441 033526 










END 




033526 














9442 033526 










ELSE 




033526 


000403 












033530 














9443 033530 


112737 


000120 


066062 




MOVB 


#' P. MSGOIS 


9444 033536 










END 


0S3S36 














9445 033SS6 


000403 








BR 


8$ 


9446 033540 


112737 


000040 


066062 


17$: 


MOVB 


«' .MSGOIS 


9447 033546 








a$: 


TYPE 


MSGOIS 


033546 


104401 


066062 






TYPEIT 


.MSGOIS 


9448 033552 










.DSABL 


CRF 










IF NOTAB NE «0 THEN IRETURN 


033552 


005737 


002372 











L334: 



TST 
BEQ 
RTS 
: : i i 



NOTAB 

L334 

PC 



GET MEMORY TYPE 
CLEAR NON INTERESTING BITS 
IS IT A LEGAL MEMORY TYPE 
IF IF SO BRANCH! !!•!!• 
IS IT AN ECC MEMORY???? 

BIT #BITO.RS 
BEQ L335 

;IS IT A MSVll-P OR A MSVll-J??? 

BIT 0BIT1.R5 
BEQ L336 

{IT IS A MSVll-P 

' BR L337 

L336::;::s! 

jIT IS A MSVll-J 
I 

L337 : { ; i ; : { 



L33S: 
sIT IS A MSVll-L/P 



BR L340 



L340: ; ! i ; ;<i 



TST NOTAB 



B6 
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001401 














OOOcOr 












033562 














9447 0333Oe 


OOiE '01 


AAAAAA 






ADO 


•4.R1 


9450 033566 


077052 








SOB 


R0.TCFIG2 


9451 039570 


A1 AAAA 

01O40O 








nov 


R4,R0 


9452 033572 


010301 








nov 


R3.R1 


9455 










.OSABL 


LSB 


t454 














▼453 










:********* 


t450 










:** CSR 


** 


T43f 










:********* 


ttAV4 nw<7A 

7490 V99j '4 










TYPE 


MSG016 


03S5 '4 




O00UO4 






TYPEIT 
.OSABL 


.MS';016 
CRI* 




1 1 37T7 
lie 131 




UOOUOc 


1 L> Xo J : 


MOVB 


#• .MSG015 


740U U330UO 


A 1411 AC 
01O103 


OOc004 






MOV 


C0NFIG(R1).R5 


740I U<990Ic 


AT37AC 
03c IMj 


AAAAA3 






BIT 


*BIT1.R5 


740c UdODlD 










BEQ 


16$ 


74D0 UddOcU 




X f Uj I I 






BIC 


#tC7400.R5 


9464 033624 


000305 








SUAB 


R5 


74D3 UOOOcD 


A337A^ 

Oee ' Oj 


AAAA1 1 






CMP 


#9..R5 


7400 UOOOOc 


1 AAAA9 








BPL 


10$ 


7HO ' wOOPO^ 


AA37nC 
vOc f v3 


Uvvvv 1 






AOO 


ft7.R5 


QA<kA A'V'tAAA 




VA/vvDv 




1 Oi • 
XVt • 


AOO 


#60, R5 


7^07 UOOO^^ 




vDDvOc 






MOVB 


R5.MSG015 










If^t • 
XDt • 


TYPE 


MSG015 






vDDvDc 






TYPEIT 
.OSABL 


.MSG015 
CRF 


7^ f X UOOOj^ 










IF NOTAB NE »0 THEN «RETURN 


A'ITf^S4 

VO<Jv J** 




00P37P 










0'^3660 


001401 












U33DDC 


AAA9A7 












A'WAAA 














OA 7 3 ATTi^i^A 
'rnlc 033004 


A&37A1 
UOc 'Ul 








ADD 


04.R1 


74 '3 UOdO'V 










SOB 


R0.TCFIG3 


9474 033672 


010400 








MOV 


R4.R0 


QA7C AW&7A 
74 '5 U330»4 


A1 AVA1 








MOV 


R3.R1 


7* f O 














OA77 
74 1 1 












74 1 0 










;** PROTECTED 


9479 












9480 033676 










TYPE 


MSGOlO 


UOdO 'D 


1 t\AAt\y 








TYPEIT 
.OSABL 


.MSGOlO 
CRF 


7*01 OOO'Uc 


XV J 'OX 


UUcOOH 




111* 
XX * : 


TSTB 


CONFIG(Rl) 


948? 033706 


100006 








BPL 


14$ 


7^0d \J99 1 


1 137*7 
XXC 'Or 


AAA 1 OA 






MOVB 


*'P.MSG015 


QAM 01^71 A 








X3t : 


TYPE 


MSG015 


033716 


104401 


066062 






TYPEIT 
•OSABL 


.MSGOIS 
CRF 


9485 033722 


000402 








BR 


15$ 


9486 033724 








14$: 


TYPE 


MSG014 


033724 


104401 


066060 






TYPEIT 
.OSABL 


.MSG014 

CRF 


9487 033730 


062701 


000004 




15$: 


AOO 


«4.R1 


9488 033734 


077016 








SOB 


R0.11$ 



BEQ L341 
RTS PC 
L341 ::;;:;; 

;BUMP POINTER 
iLOOP UNTIL DONE 



:MAKE ASCII 
:PLU6 INTO MEMORY 



TST NOTAB 
BEQ L342 
RTS PC 
L342:::i::: 

sBUMP POINTER 



5 BANK PROTECTED? 
;N0 - SKIP 



s PRINT SPACE 



;BUMP POINTER 
:L00P UNTIL DONE 
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9409 033736 010400 MOV R4.R0 

9490 033740 010301 MOV R3.R1 

9491 033742 000207 RETURN 



I 



CVMJAAO MSVll-J MEMORY OIAG. 
TRAP PARITY ERROR HANDLER 



9494 

9495 
9496 
9497 

9498 

9/199 

9500 
9501 
9502 
9503 
9504 
9505 
9506 
9507 
9508 
9509 
9510 
9511 
9512 
9513 
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9514 
9515 
9516 
9517 
9518 
9519 
9520 
9521 
9522 
9523 



033744 
033752 
033754 
033760 
033762 
033770 
033772 
033772 
034000 
034004 
034010 
034016 
034020 
034026 
034030 
034034 
034036 
034042 
034042 
034046 



022737 
001003 
005237 
000002 
022737 
001013 

012737 
004737 
063716 
042766 
000002 
022737 
001003 
013716 
000002 
004737 

005237 
104032 



000001 
002072 
000002 

177777 
034152 
002326 
000004 

000003 

002304 

034152 

002064 



SEO 0275 



.SBTTL TRAP PARITY ERROR HANDLER 

VECTOR TO HERE FROM TRAPS TO 114 

IGNORE ERRORS BUT COUNT IF NOPAR FLAG - 1. 

**************************************************************** f ************* 



002076 PARITY: 



002076 

002144 

000002 
002076 



1$: 



2$: 



3*; 



CODE 

"0" 
1 
2 
3 

CMP 
BNE 
INC 
RTI 
CMP 
BNE 
SET 

CALL 

ADD 

BIC 

RTI 

CMP 

BNE 

MOV 

RTI 

CALL 

FATAL 

INC 

ERROR 

.DSABL 



ACTION 

PRINfUNEXPECTED PARITY TRAP 
COUNT ERROR 

SET "ABORT" / SETUP "BADPC" / RETURN VIA PCBUMP 
RETURN VIA "PARTHERE" 



<^1. NOPAR 
1$ 

PARCNT 

,'^2. NOPAR 
2i 

ABORTFLAG 

BADSTACK 
PCBUMP. (SP) 
#BIT2.2(SP) 

»3. NOPAR 

PARTHERE.(SP) 

BADSTACK 
32 

FATAL* 
♦ 32 
CRF 



COUNTING PARITY ERRORS? 
NO - SKIP 

PARITY ERROR COUNTER * 1 

ACTION CODE = 2 ? 

NO SKIP 

YES 

MOV 0-1. ABORTFLAG 
:FIND BAD SP.PC.PSU OFF STACK 
s UPDATE RETURN PC 
:SH0U FAILURE BY .NE. 

; ACTION CODE - 3 ? 
:N0 - SKIP 



:FIND BAD SP.PC.PSU OFF STACK 
;SET FATAL INDICATOR 
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TRAP NON-EXISTANT MEMORY (HOLES) HANDLER 



E6 

10 Page 



300 



SEQ 0276 



9526 
9527 
9528 
9529 
9530 
9531 
9532 
9533 
9534 
9535 
9536 
9537 
9538 
9539 
9540 
9541 
9542 
9543 
95A4 
9545 
9546 
9547 
9548 



.SBTTL TRAP NON-EXISTANT MEMORY (HOLES) HANDLER 
******************************************************************************* 
VECTOR TO HERE (SOMETIMES) FROM TRAPS TO 4 

CODE IN NONEM DETERMINES ACTION AS FOLLOUS: 

1) IGNORE ERRORS BUT COUNT IF NONEM (NO NON-EXISTANT MEMORY) FLAG - 1. 

2) TO EXIT PATTERN 0 DURING SIZING IF NON-EXIST MEM ERROR 
******************************************************************************* 



034050 
034056 
034060 
014064 
034072 
034074 
034100 
034102 
034106 
034112 



034114 
034120 
034120 
034124 



022737 


000001 


002100 


NONEXIST.CMP 


«1. NONEM 


: COUNTING NON EXIST ANT MEMORY ERRORS? 


001011 








BNE 


2* 


:N0 - SKIP 


005237 


002070 






INC 


NEMCNT 


sBUMP NON-EXISTANT MEMORY COUNTER 


022737 


000001 


002070 




CMP 


Ol.NEMCNT 


: FIRST ERROR? 


001002 








BNE 


1$ 


;N0 - SKIP 


010037 


002034 






MOV 


RO, ADDRESS 


{ASSUME RO CONTAINS THE ADDRESS ACCESSED 


000002 






1$: 


RTI 


005237 


002070 




2(: 


INC 


NEMCNT 


;BUMP NON-EXISTANT MEMORY COUNTER 


012701 


000001 






MOV 


»1.R1 


: DUMMY UP Rl FOR A FORCED SOB EXIT 


000002 








RTI 












: ******************************************************************************* 










.SBTTL 


TRAP TIMEOUT 


(TRAP TO 4) HANDLER 


004737 


034152 




TIMEOUT 


.•CALL 


BADSTACK 


:FIND BAD SP.PC.PSU OFF STACK 










FATAL 


6 




005237 


002064 






INC 


FATAL* 


{SET FATAL INDICATOR 


104006 








ERROR 


♦6 












.DSABL 


CRF 





9549 

9550 

9551 034126 004737 034152 

9552 034132 

034132 005237 002064 
034136 104007 

9553 

9554 034140 004737 034152 

9555 034144 

034144 005237 002064 
034150 104005 

9556 
9562 

9563 034152 



9564 034152 010637 002026 

9565 034156 062737 000002 002026 

9566 034164 016637 000002 002022 

9567 034172 016637 000004 002032 

9568 034200 000207 



.SBTTL TRAP MEMORY MANAGEMENT (TRAP TO 250) HANDLER 

BADSTACK ;FIND BAD SP.PC.PSU OFF STACK 

7 

FATAL* :SET FATAL INDICATOR 

♦ 7 
CRF 

TRAP RESERVED INSTRUCTION HANDLER 
BADSTACK 5 FIND BAD SP.PC.PSU OFF STACK 

5 

FATAL* sSET FATAL INDICATOR 

♦5 
CRF 



MMTRAP: CALL 
FATAL 
INC 
ERROR 
.DSABL 
.SBTTL 

PDP1105:CALL 
FATAL 
INC 
ERROR 
.DSABL 



BADSTACK :SUBTST <<FIND BAD SP. PC. £ PSU FROM STACK>> 
;*SUBTEST FIND BAD SP. PC. £ PSU FROM STACK 

}******************************************************************************* 



MOV 
ADD 
MOV 
MOV 

RETURN 



SP.BADSP 
#2.BADSP 
2(SP).BADPC 
4(SP).BADPSU 



CVMJAAO MSVll-J MEMORY 01 AG. 
TRAP KERNEL TRAP HANOLER 



9571 




9572 




9573 




9574 




9575 




9576 034202 


042766 


9577 034210 


000002 


9578 




9579 




9580 034212 


052737 


9581 034220 


000002 


9582 




9583 




9584 034222 


042737 


9585 034230 


000002 


9586 




9587 




9588 034232 


005737 


9589 034236 


001406 


9590 034240 


013737 


9591 034246 


052737 


9592 034254 


000002 


9593 




9594 




9595 034256 


005737 


9596 034262 


001403 


9597 




9598 034264 


053737 


9599 034272 


000002 
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.SBTTL TRAP KER^4EL TRAP HANDLER 
; KERNEL IS A TRAP THAT COMES HERE 



177572 



000001 177572 



002544 

002544 
000001 



002544 

002550 



177746 
177746 



SEO 0277 



140000 000002 $KERNEL 
000001 



RTI 



BIC 



«140000,2(SP) 



.SBTTL TRAP ENERGIZE TRAP HANDLER 

$ENERGIZE:BIS «6IT0.MMR0 
RTI 

.SBTTL TRAP DEENERGIZE TRAP HANDLER 

$DEENERGIZE:BIC #BITO,MMRO 
RTI 

SBTTL TRAP CACHON TRAP HANDLER 



CACHKN 
1$ 

CACHKN. CONTRL 
«BITO,CONTRL 



IS THERE A CACHE 
NO - RETURN 

SETUP CACHE AS PER CONSTANT (USUALLY 1 ■ FULLY ON) 
DISABLE TRAPS (BUT NOT ABORTS) 



177746 



$CACHN: TST 
BEQ 
MOV 
BIS 

1$: RTI 

.SBTTL TRAP CACHOFF TRAP HANDLER 
$CACHF: TST CACHKN ;IS THERE A CACHE? 

BEQ \% ;N0 - RETURN 

{DISABLE TRAPS (NOT ABORTS), FORCE MISSES. FLUSH. BYPASS 
BIS CACHKF, CONTRL 
1$: RTI 



CVMJAAO MSVll-J MEMORY DIAG. 
TRAP LOAD CSR TRAP HANDLER 
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SEQ 0278 



9602 
9603 
9604 
9605 



9606 
9607 



9608 
9609 
9610 
9611 
9612 
9613 
9614 
9615 
9616 
9617 
9618 



9619 
9620 
9621 
9622 
9623 

9624 
9625 
9626 

9627 



034274 
034274 
034276 
034300 
034304 
034304 
034310 
034312 
034316 
034320 
034324 
034330 
034334 
034336 
034344 
034346 
034354 
034362 
034362 
034364 
034366 



034370 
034370 
034372 
034376 
034404 
034404 
034406 



010046 
010146 
013700 

005737 
001021 
005737 
100007 
113701 
042701 
020137 
001404 
123737 
001003 
052737 
013760 

012601 
012600 
000002 



010046 
013700 
016037 

012600 
000002 



.SBTTL TRAP LOAD CSR TRAP HANDLER 
:L0AD CORRECT CSR UITH DATA IN CSR 

: PROGRAM CSR'S ASSERT INHIBIT MODE POINTER UHEN LOADED 



$L0ADC: PUSH RO.Rl 



002152 

002536 

002532 

002533 
177740 
002152 

002532 002152 1$: 



MOV CSRNO.RO 

IF INHECC IS TRUE THEN GOTO Zi 



020000 
002150 



002150 
172100 



2$: 
3$: 



TST 


PGMCSR 


BPL 


1* 


MOVB 


PGMCSR ♦l.Rl 


BIC 


#tC37.Rl 


CMP 


Rl.CSRNO 


BEQ 


2i 


CMPB 


PGMCSR. CSRNO 


BNE 


3< 


BIS 


0BIT13.CSR 


MOV 


CSR.CSRADDCRO) 


POP 


Rl.RO 



RTI 



iSAVE REGISTERS 

MOV RO.-(SP) 
MOV Rl.-(SP) 

: CREATE CSR ADDRESS 

:DON'T UANT INH. MODE POINTER ON 

TST INHECC 

BNE 31 

PROGRAM IN INTERLEAVED SPACE? 

BRANCH IF NOT 

CHECK SECOND CSR 

CLEAR UNNECESSARY BITS 

IS THIS THE CURRENT CSR? 

BRANCH IF IT IS 

IS THIS THE CURRENT CSR? 

BRANCH IF NOT 

SET THE INHIBIT MODE POINTER TO 1ST 16K 
LOAD THE CSR 
RESTORE REGISTERS 

MOV (SP)»,R1 
MOV (SP)*.RO 



.SBTTL TRAP READ CSR TRAP HANDLER 
;READ THE CORRECT CSR INTO LOCATIONS CSR 
$READC: PUSH RO 



002152 
172100 



002150 



MOV 
MOV 
POP 

RTI 



CSRNO.RO 

CSRADD(RO).CSR 

RO 



:READ IT 



MOV RO.-(SP) 
MOV (SP)*.RO 



H6 
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SEQ 0279 



9629 

9630 034410 
034410 
034412 
034414 

9631 034416 

9632 034422 

9633 034426 

9634 034430 

9635 034434 

9636 034436 

9637 034442 

9638 034^46 

9639 034452 

9640 034454 

9641 034462 

9642 034464 

9643 034470 
9644 

9645 034474 
034474 
034476 
034500 

9646 034502 
034502 
034510 
034512 
034520 

9647 034522 

9648 034530 
034530 
034532 

9649 034532 

9650 034540 
034540 

9651 034540 
9652 

9653 034542 

9654 034544 
034544 

9655 034552 

9656 034554 

9657 034562 

9658 034566 



010046 
010246 
010346 
012700 
063700 
005002 
005737 
100007 
113703 
042703 
020337 
001404 
123737 
001002 
012702 
004737 



012603 
012602 
012600 

032737 
001410 
032737 
001004 
052766 

000403 



.SBTTL TRAP TEST (Rl) 6 READ CSR CAREFULLY 
♦TSTRD: PUSH R0.R2,R3 



172100 
002152 

002532 

002533 
000200 
002152 

002532 002152 1^ 



020000 
034542 



2$: 
3$: 

5$: 



MOV »CSRAOO.RO 

ADO CSRNO.RO 

CLR R2 

TST PGMCSR 

BPL 14 

MOVB PGMCSR U-RS 

BIC #BIT7.R3 

CMP R3.CSRN0 

BEQ 2i 

CMPB PGMCSR. CSRNO 

BNE 34 

MOV #BIT13.R2 

CALL TSTRDl 

;IF SINGLE BIT ERROR ONLY 

POP R3.R2.R0 



! CREATE CSR ADDRESS 



MOV RO. (SP) 
MOV R2.-(SP) 
MOV R3.-(SP) 



SET CARRY BIT 



000020 
100000 
000001 



002150 
002150 
000002 



IF #BIT4 SET. IN CSR AND 0BIT15 OFF. IN CSR 



042766 000001 000002 

000002 
010210 
053737 



105711 
042737 
011037 
000207 



002552 



140000 
002150 



177776 
177776 



BIS #BIT0,2(SP) 
ELSE 



BIC #BIT0.2(SP) 

END iOF IF #BIT4 

RTI 

TSTRDl: MOV R2.(R0) 
TESTAREA 

BIS TESTMOOE.PSW 

.DSABL CRF 

TSTB (Rl) 

BIC #BIT15!BIT14.PSW 

MOV (RO).CSR 
RETURN 



MOV (SP)*.R3 
MOV (SP)».R2 
MOV (SP)*.RO 

BIT «BIT4.CSR 
BEQ L343 
BIT WIT15.CSR 
BNE L343 



BR L344 

L343: 
L344: 

.•GO TO SYSTEM TEST MODE 
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TRAP ECC DISABLE ALL CSR'S TRAP HANDLER SEQ 0280 



9661 








.SoTTL 


TRAP ECC DISABLE ALL CSR S TRAP HANDLER 


9662 034570 


012737 


A A AAA ^ 

000002 


A A ^ 4 C A 

002150 


»ECCDIS:MOv 


rolTl ,CSR 


9663 034576 


004737 


035314 




A Jkl 1 

CALL 


APnAI IT 

CSROUT 


9664 034602 


AAAAA^ 

000002 






RTI 




9665 








. SBTTL 


TRAP ECC DISABLE Or 1 SELECTED CSR TRAP HANDLER 


A^££ AViKAil 

9666 034604 


012737 


AAAAA'9 

000002 


AA^ 1 C A 

002150 


»ECC10IS:M0v 


mOTT4 APR 

vBITl ,CSR 


A^^^ AVii£ 4 ^ 

9667 034612 


4 Ail A '^C 

104425 






LOAOCSR 




9660 034614 


AAAAA^ 
000002 






RTI 




9669 








eOTTI 


TDAD TklTTTAI T7f Al 1 ^CQ 1 C TQAD LJAkini CO 

TRAP INITIALIZE ALL CSR S TRAP HANDLER 


9670 034616 


A1 O^T^ 

012737 


AAAAA 1 
000001 


AA^I CA 

002150 


VCLLINIT zMOV 


ilOTTA ^CD 

OdITO.CSR 


9671 034624 


00473 / 


Avev 1 A 
035314 




CALL 


CSROUT 


9672 034690 


AAAAA9 

000002 






DTT 

R 1 I 




9673 








CDTTI 

.SBTTL 


TDAO TUTTTAI T7C 1 CCI C^TCA ^CO TDAO UAUm CD 

TRAP INITIALIZE 1 SELECTED CSR TRAP HANDLER 


ATA&T3 
96 '4 0346 3£ 


012 f 3f 


AAAAA 1 

000001 


AA9 1 6A 

002130 


fCLLllNl 1 :nuv 


ADTTA ^CD 

vBl lO.LSK 


96 f 5 034640 


1 A4^ oc 
104425 






L0A0L5R 




96 »6 03464tf 


000002 






DTT 

K 1 1 




9o / / 








CDTTI 

. SB 1 iL 


TDAD CklADI C CDC DADTTV TDADC Akl Al 1 ^CDI C 

iKMr tNABLc bBt rHKl 1 Y iKMrb UN HLL LSR S 


96 f 8 03464«» 


A1 

012 r 3 r 


AAAAA7 

000003 


AA91 CA 

002130 


ACklACDC . Mn\l 

f cNnsBc : nuv 


J4DTTAIDTT1 CCD 

ffOl 1 0!B1 1 1 1 LSK 


9679 034652 


AA^ 717 

004 10 1 


035314 




LALL 


^CDAI IT 


9600 034656 


AAAAA9 

000002 






DTT 
K 1 1 




9601 








CDTTI 


TDAD CMADI C COC DADTTV TDADC AM 1 CCI C^TCA PCD 

1 KHr bNHBLc Sbc rAKl 1 Y 1 KArS UN 1 SkLcLIkU LSR 


960c 034660 


A1 01T7 

012 '3' 


AAAAAT 

000003 


AA31 QA 
002130 


$ENA1SBE:M0V 


#BIT0!BIT1.CSR 


9603 034666 


1 AAA 

104«»23 






LOADCSR 




96B4 0346 rO 


AAAAA9 

000002 






RTI 




96B5 








.SBTTL 


TRAP WRITE CHECKBITS THRU ALL CSR'S TRAP HANDLER 


9606 034672 


A1 T7T7 

013 '3 ' 


AAOT 1 A 

002314 


AA01 QA 

002130 


$CBCSR: MOV 


CHECK. CSR iBITS 11-5 


QCA^ ATA7AA 

968 ' 034 rOO 


A^07T7 
032 ' 3 1 


AAAAAA 

000006 


AA01 CA 

UUcIjO 


BIS 


#BIT1!BIT2.CSR : CHECK MODE 


96A.> 


004737 


035314 




CALL CSROUT 


9689 034712 


000002 






RTI 




9690 








.SBTTL 


TRAP WRITE CHECKBITS THRU 1 SELECTED CSR TRAP HANDLER 


9691 034714 


013737 


002314 


002150 


$CB1CSR:M0V 


CHECK. CSR ;BITS 11-5 


9692 034722 


052737 


000006 


002150 


BIS 


#BIT1!BIT2.CSR ; CHECK MODE 


9693 034730 


104425 






LOADCSR 




9694 034732 


000002 






RTI 





J6 



CVttjAAO MSVll-J MEMORY OIAG. 
TRAP WAS THERE A SBE ON ANY 



9697 

9698 034734 
034734 
034736 

9699 034740 

9700 054744 

9701 0J4746 
034746 

9702 034746 
034746 
034752 

9703 034752 

9704 034754 
034754 

9705 034756 

9706 034760 
034760 
034766 

9707 034770 
034770 

9708 034774 
034774 

9709 034776 
034776 

9710 034776 
034776 

9711 034776 
034776 
035000 

9712 035002 
035002 
035010 
035016 
035020 

9713 035020 
035020 

9714 035020 

9715 035022 
035022 
035024 

9716 035026 
035026 

9717 035030 

9718 035036 
035036 
035040 

9719 035040 

9720 035046 
035046 

9721 035046 
9722 

9723 

9724 035050 

9725 035052 

9726 035060 

9727 035066 

9728 035070 



010146 
010446 

013701 002224 
005004 



005037 002152 

006301 

103010 
104426 

032737 000020 
001403 

012704 177777 
000411 



005701 
001407 

062737 000002 
023727 002152 
003755 



006004 

012604 
012601 

103004 

052766 000001 
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CSR TRAP HANDLER 

.SBTTL TRAP WAS THERE A SBE ON ANY CSR fRAP HANDLER 
IUASSBE:PUSM R1,R4 



002150 



002152 
000036 



000002 



000403 

042766 000001 000002 
000002 



104426 

042766 000001 000002 
032737 000020 002150 
001403 

052766 000001 000002 



MOV TOTCSRS.Rl 
CLR R4 
BEGIN LUSBE 



:GET CSR'S BYTE 



FOR CSRNO := #0 TO «6 BY #2 

ASL Rl 
ON. ERROR 

READCSR 

IF #BIT4 SET. IN CSR 



MOV Rl.-(SP) 
MOV R4.-(SP) 



B57: :::::: 

CLR CSRNO 
B60::::i:: 

BCC L345 



BIT aBIT4.CSR 
BEQ L346 

SET R4 

MOV 0-1, R4 

LEAVE LUSBE 

BR E57 

END ;0F IF *BIT4 

L346::::::: 

END :0F ON. ERROR 

L345::::i:: 

IF Rl EQ «0 THEN LEAVE LUSBE 

TST Rl 
BEQ E57 

END ;0F FOR CSRNO 

ADD «2. CSRNO 
CMP CSRNO, »36 
BLE B60 
E60: ::::::: 

END LUSBE 

E57: :::::: 

ROR R4 J SET C BIT FOR ERROR 

POP R4,R1 

MOV (SP)*,R4 
MOV (SP)*.R1 

ON. ERROR 

BCC L347 

BIS #BIT0,2(SP) 
ELSE 

BR L350 
L347:;::;ii 

BIC *BIT0.2(SP) 
END jOF ON. ERROR 

L350:i::i:: 

RTI 

.SBTTL TRAP UAS THERE A SBE IN 1 SELECTED CSR TRAP HANDLER 

;0N RETURN IF CARRY IS SET THERE UAS A SBE 
^UASISBE: READCSR 

BIC «BIT0.2(SP) ;CLR C BIT ON STACK 
BIT #BIT4,CSR 
BEQ li 

BIS #BIT0.2(SP) iSET C BIT ON STACK 



SEQ 0281 



I<6 
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TRAP WAS THERE A SBE IN 1 SELECTED CSR TRAP HANDLER SEQ 0282 

9729 035076 000002 U: RTI 



L6 



CVMJAAO MSVU-J MEWRY DIAG. 
TRAP UAb (HERE A QBE ON ANY 

9732 
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CSR TRAP HANDLER 



SEQ 0263 



9733 


035100 










035100 


010146 








035102 


010446 






9734 


035104 


013701 


002224 




9735 


035110 


005004 






9736 


035112 










035112 








9737 


035112 










035112 


005037 


002152 






035116 








9738 


035116 


006301 






9739 


035120 










035120 


103010 






9740 


035122 


104426 






9741 


035124 










035124 


032737 


100000 


002150 




035132 


001403 






9742 


035134 










035134 


012704 


177777 




9743 


035140 










035140 


000411 






9744 


035142 










035142 








9745 


035142 










035142 








9746 


035142 










035142 


005701 








035144 


001407 






9747 


035146 










035146 


062737 


000002 


002152 




035154 


023727 


002152 


000036 




035162 


003755 








035164 








9748 


035164 










035164 








9749 


035164 


006004 






9750 


035166 










035166 


012604 








035170 


012601 






9751 


035172 










035172 


103004 






9752 


035174 


052766 


000001 


000002 


9753 


035202 










035202 


000403 








035204 








9754 


035204 


042766 


000001 


000002 


9755 


035212 










035212 








9756 035212 


000002 







.SBTTL TRAP 
$UASOBE:PUSH R1,R4 



WAS THERE A DBE ON ANY CSR TRAP HANDLER 



9757 
9758 
9759 
9760 
9761 
9762 
9763 



035214 
035216 
035222 
035224 
035232 



104426 
005737 
100004 
052766 
000002 



002150 
000001 



MOV TOTCSRS.Rl 
CLR R4 
BEGIN LUOBE 



:GET CSR'S BYTE 



FOR CSRNO 



ASL 

ON. ERROR 



«0 TO #36 BY 02 
Rl 



READCSR 

IF 0BIT15 SET. IN CSR 



SET R4 
LEAVE LUDBE 
END ;0F IF #BIT4 
END :0F ON. ERROR 
IF Rl EQ «0 THEN LEAVE LUDBE 

END ;0F FOR CSRNO 



MOV Rl. (SP) 
MOV R4.-(SP) 



B61:s:i::: 

CLR CSRNO 
B62: :::::: 

BCC L351 

BIT •BIT15.CSR 
BEQ L352 

MOV •-1.R4 

BR E61 



L352: 
L351: 



END LUDBE 



ROR 
POP 



R4 

R4.R1 



iSET C BIT FOR ERROR 



E62: 
E61: 



ON. ERROR 

BIS #BIT0.2(SP" 
ELSE 



L353: 



TST Rl 
BEQ E61 

ADD «2. CSRNO 
CMP CSRNO, »36 
BLE B62 



MOV (SP)».R4 
MOV CSP)«.R1 

BCC L353 
BR L354 



BIC eBIT0.2(SP) 
END ;0F ON. ERROR 

L354: 

RTI 

.SBTTL TRAP UAS THERE A OBE ON 1 SELECTED CSR TRAP HANDLER 
;0N RETURN IF CARRY IS SET THERE UAS A DBE 
$UAS1DBE: READCSR 



000002 



TST 
BPL 
BIS 
RTI 



CSR 
3$ 

#BIT0.2CSP) 



OBE? 
NO - SKIP 
SET C BIT ON STACK 



M6 
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TRAP UAS THERE A QBE ON 1 SELECTED CSR TRAP HANDLER 

9764 035234 042766 000001 000002 31: BIC MIT0.2CSP} :CLR C BIT ON STACK 

9765 035242 000002 RTI 



N6 



CVMJAAO 
TRAP 

9768 
9769 

9770 
9771 
9772 
9773 

9774 
9775 
9776 
9177 
9778 
9779 
9780 
9781 
9782 
9783 
9784 
9785 



MSVU-J MEMORY OIAG. MACRO VOS.Olb Friday 15-Feb-85 16:10 
CLEAR ALL ECC CSR'S TRAP HANDLER 



035244 
035244 
035250 
035254 

035256 
035256 
035262 
035264 



035266 
035274 
035300 



035302 
035310 
035312 



005037 
004737 
000002 



005037 
104425 
000002 



052737 
004737 
000002 



052737 
104425 
000002 



002150 
035314 



002150 



000006 
035314 



002150 



000006 002150 



TRAP 
GSR 

CSROUT 

TRAP 
GSR 



Page 313 
CLEAR ALL EGG GSR'S TRAP HANDLER 



SEQ 0205 



CLEAR 1 SELECTED GSR TRAP HANDLER 



GLR GSR 



GLR GSR 



.SBTTL 
tCLRCSR: CLEAR 

CALL 
RTI 
.SBTTL 
ICLRICSR: CLEAR 

LOAOCSR 
RTI 

.SBTTL TRAP 

jCHECKBITS ALREADY IN LOG 
IGHKDIS B.lS «BIT1!BIT2.GSR 
CALL GSROUT 
RTI 

.SBTTL TRAP EGG DISABLE, GHEGK MODE, L WRITE GHEGKBITS IN 1 SELECTED GSR 
;GHEGKBITS ALREADY IN LOG "GSR" 
$GHK1DIS:BIS «BIT1!BIT2,GSR iEGG DISABLE L DIAG CHECK MODE 

LOADGSR 
RTI 



ECC DISABLE, CHECK MODE, L WRITE GHEGKBITS IN ALL CSR'S TRAP HANDLER 
GSR " 

:ECC DISABLE L DIAG GHEGK MODE 



I 



B7 



CVMJAAO MSVll-J MEMORY DIAC. 
»P ECC 015 

9788 035314 
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TRAP ECC DISABLE. CHECK MODE. £ WRITE CHECKBITS IN 1 SELECTED 



9789 035314 
035314 010146 

9790 035316 013701 002224 

9791 035322 
035322 

9792 035322 

035322 005037 002152 
035326 

9793 035326 006301 

9794 035330 
035330 103001 

9795 035332 104425 
97% 035334 

035334 

9797 035334 
035334 005701 
035336 001407 

9798 035340 

035340 062737 000002 002152 
035346 023727 002152 000036 
035354 003764 
035356 

9799 035356 
035356 

9800 035356 
035356 012601 

9801 035360 000207 
9802 

9803 035362 



9804 035362 
035362 010046 
035364 010146 

9805 035366 013701 002102 

9806 035372 006301 

9807 035374 006301 

9808 035376 042761 020000 002666 

9809 035404 
035404 012601 
035406 012600 

9810 035410 000002 



CSROUT: SUBTST <<SUBR URITE IN ALL CSR'S>> 
♦SUBTEST SUBR URITE IN ALL CSR'S 



PUSH 



Rl 



MOV TOTCSRS.Rl 
BEGIN LCSROUT 



.GET CSR'S BYTE 

FOR CSRNO 90 TO 936 BY 92 

ASL Rl 
ON. ERROR 

LOADCSR 
END :0F ON. ERROR 

IF Rl EQ 90 THEN LEAVE LCSROUT 
END :0F FOR CSRNO 



NOV R1,-(SP) 



B63: 



s i s i t : 



CLR CSRNO 
B64 : s i i I ; I 



BCC L35S 

L355: i i I : i : 

TST Rl 
BEQ E63 

ADD 92. CSRNO 
CMP CSRNO. 936 
BLE B64 



E64: 
E63: 



END LCSROUT 
POP Rl 
RETURN 

IINVALID: SUBTST <<TRAP INVALIDATE BACKGROUND PATTERN>> 



MOV (SP)«.R1 



♦SUBTEST TRAP INVALIDATE BACKGROUND PATTERN 

******************************************************************************* 

PUSH RO.Rl 

MOV RO.-(SP) 
MOV Rl.-(SP) 

MOV BANK.Rl 
ASL Rl 
ASL Rl 

BIG 9BIT13,C0NFIG*2(R1) 
POP Rl.RO 

MOV (SP)*.R1 
MOV (SP)».RO 

RTI 



SEQ 0286 



C7 
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TRAP INVALIDATE BACKGROUND PATTERN 



SEQ 0287 



9812 035412 








«ERRGEN 




SUBTST<<TRAP GENERATE AND TEST ERROR ADDRESS>> 










: ************************************************************ f **************** 










i ♦SUBTEST 


TRAP GENERATE AND 


TEST ERROR ADDRESS 










********************************************************************* t********** 


9813 035412 










PUSH 


R0.R1.R2.R3 




035412 


010046 












MOV RO,-(SP) 


035414 


010146 












MOV Rl.-(SP) 


035416 
03'>420 


010246 












MOV R2.-(SP) 


010346 












MOV R3.-(SP) 


9814 035422 


013703 


002104 






MOV 


BANKINDEX.R3 


9815 035426 


005737 


002456 






TST 


NOSUPER 




9816 035432 


001003 








BNE 


6$ 




9817 035434 


013700 


172246 






MOV 


SIPAR3.ro 


{GENERATE WHAT ERRCR ADDR SHOULD BE 


9818 035440 


000402 








BR 


7$ 


9819 035442 


013700 


177646 




6$: 


MOV 


UIPAR3.ro 




9820 035446 


072027 


177773 




7$: 


ASH 


#-5.R0 




9821 035452 


005737 


002132 






TST 


EQFLAG 




9822 035456 


001002 








BNE 


1$ 




9823 035460 


042700 


177600 






BIC 


#tC177.R0 




9824 035464 


000301 






1$: 


SUAB 


Rl 


:GET CURRENT ADDRESS BITS 11 AND 12 


9825 035466 


006201 








ASR 


Rl 


9826 035470 


006201 








ASR 


Rl 




9827 035472 


006201 








ASR 


Rl 




9828 035474 


042701 


177775 






BIC 


#tC2.Rl 




9829 035500 


060100 








ADD 


Rl.RO 


iADD THEM TO THE ADJUSTED PAR VALUE 


9830 










sGET 


ERROR ADDRESS FROM CSR 


UNDER TEST 


9831 035502 


013701 


002150 






MOV 


CSR.Rl 




9832 035506 


072127 


177773 






ASH 


#-5,Rl 




9833 035512 


042701 


177600 






BIC 


*tC177.Rl 




9834 035516 


005737 


002454 






TST 


N022BIT 


:IS THIS AN 11/83, 11/23-B OR 11/23 ? 


9835 035522 


001024 








BNE 


2$ 


; BRANCH IF NOT NECESSARY 


9836 035524 


005737 


002132 






TST 


EQFLAG 


ilS IT EQ6? 


9837 035530 


001421 








BEQ 


2$ 


; BRANCH IF NOT 


9838 035532 










PUSH 


RO 


;SAVE GENERATED ERROR ADDRESS 


035532 


010046 












MOV RO.-(SP) 


9839 035534 


013702 


002152 






MOV 


CSRN0,R2 


5 GET CSR NUMBER 


9840 035540 


052762 


040000 


172100 




BIS 


♦BIT14.CSRADDCR2) 


:TURN ON EQB BIT CAREFULLY 


9841 035546 


016200 


172100 






MOV 


CSRA00(R2).RO 


;GET CSR CONTENTS 


9842 035552 


042762 


040000 


172100 




BIC 


♦BIT14.CSRA00(R2) 


;TURN OFF EQB BIT CAREFULLY 


9843 035560 


042700 


177037 






BIC 


#tC740,R0 


! CLEAR EVERYTHING BUT ERROR ADDR 


9844 035564 


006300 








ASL 


RO 




9845 035566 


006300 








ASL 


RO 


: SHIFT ADDR BITS 18-21 INTO POSITION 


9846 035570 


060001 








ADO 


RO.Rl 


:ADO TO CURRENT ERROR ADDRESS 


9847 035572 










POP 


RO 




035572 


012600 












MOV (SP)*.RO 


9848 035574 


020001 






2$: 


CMP 


RO.Rl 


; COMPARE REAL AND GENERATED ERR. ADDR. 


9849 035576 


001420 








BEQ 




.•BRANCH IF THEY ARE THE SAME 


9850 035600 


005737 


002136 






TST 


INTFLAG 


! INTERLEAVED? 


9851 035604 


001411 








BEQ 


3» 


iNO • UE HAVE AN ERROR 


9852 035606 


062700 


000100 






ADO 


«100.R0 




9853 035612 


005737 


002140 






TST 


INT64K 


;64K INTERLEAVED MEMORY? 


9854 035616 


001002 








BNE 


4$ 




9855 035620 


062700 


000100 






ADD 


«100.R0 




9856 035624 


020001 






4$: 


CMP 


RO.Rl 




9857 035626 


001404 








BEQ 


5$ 




9858 035630 


005737 


002066 




3$: 


TST 


SKPERR 


.•ARE WE SUPPOSED TO SKIP ERROR P.O.? 


9859 035634 


001001 








BNE 


5$ 


sYES - SKIP ERROR PRINTOUT 



D7 



CVMJAAO MSVll-J MEMORY DIAG. 
TRAP GENERATE ANO TEST ERROR 
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ADDRESS 



9860 
9861 
9862 
9863 



9864 
9865 
9866 



035636 104462 

035640 010137 002460 

035644 005037 002066 
035650 

035650 012603 

035652 012602 

035654 012601 

035656 012600 

035660 000002 

035662 



9867 035662 

9868 035666 

9869 035674 

9870 035676 
9871 

9872 035700 



9873 035700 

9874 035704 

9875 035712 

9876 035714 
9877 



005037 002150 
052737 000004 
104425 
000002 



005037 002150 
052737 040004 



104425 
000002 



002150 



002150 



5*; 



PERR36 
MOV 
CLR 
POP 



RTI 



Rl.ERRAOD 

SKPERR 

R3, R2.R1.ro 



ELSE PRINT ERROR ADDRESS ERROR 
SAVE CSR'S ERROR ADDRESS 
ENABLE THE ERROR PRINTOUT AGAIN 
RESTORE REGISTERS 

MOV (SP)».R3 
MOV (SP)».R2 
MOV (SP)«.R1 
MOV (SP)».RO 



JCBREG: SUBTST <<TRAP ENABLE CHECKBIT REGISTER >> 

; ♦SUBTEST TRAP ENABLE CHECKBIT REGISTER 

; ******************************************************************************* 

CLR CSR 



BIS «BIT2.CSR 

LOADCSR 

RTI 



ENABLE DIAGNOSTIC MODE 
LOAD CSR REGISTER 



JSYNREG: SUBTST <<TRAP ENABLE SYNDROME BIT REGISTER>> 

I******************************************************************************* 

; ♦SUBTEST TRAP ENABLE SYNDROME BIT REGISTER 

******************************************************************************** 

CLR CSR 



BIS #BIT14!BIT2.CSR 

LOADCSR 

RTI 



ENABLE DIAGNOSTIC MODE 
LOAD CSR REGISTER 



SEQ 0286 



CVMJAAO MSV11-. 
TRAP 

9880 035716 



9881 
988? 
9883 
9884 
9885 
9886 
9887 
9888 
9889 
9890 

9891 035716 
035716 
035720 
035722 
035724 
035726 

9892 035730 

9893 035734 

9894 035740 

9895 035744 

9896 035750 

9897 035752 

9898 035756 

9899 035762 

9900 035766 

9901 035772 

9902 035774 

9903 035776 

9904 036000 

9905 036004 

9906 036012 

9907 036014 
9906 036020 

9909 036024 

9910 036030 
9911 

9912 036032 

9913 036036 

9914 036040 
9915 

9916 036044 

9917 036050 

9918 036054 

9919 036056 

9920 036062 

9921 036066 

9922 036070 

9923 036074 

9924 036076 

9925 036102 

9926 036104 

9927 036110 

9928 036112 



MEMORY DIAG. MACRO VOS.Olb Friday 15-Feb 85 16 
ENABLE SYNDROME BIT REGISTER 



E7 

10 Page 318 



SEQ 0289 



010046 
010146 
010246 
010446 
010546 
012700 
012701 
012704 
005737 
001404 
012701 
012704 
012702 
012705 
012021 
010224 
077503 
012741 
022737 
001007 
012704 
012705 
052724 
077503 

022703 
001516 
072327 

012701 
005737 
001402 
012701 
012702 
010321 
062703 
077204 
005737 
001442 
162701 
010102 
062702 



172340 
172240 
172200 
002456 

177640 
177600 
077406 
000010 



177600 
000005 

172206 
000004 
100000 



000200 

000011 

172246 
002456 

177646 
000004 

000200 

002240 

000010 

000004 



SUBTST<<SUBR MAPPER >> 
************************************************** 

♦SUBTEST SUBR MAPPER 

********************************************************** t*******t*******t***t 

THIS SUBROUTINE MAPS THE MEMORY BANK (16K WORDS - 1 BANK) 

IN R3 TO THE TEST PATTERN AREA (SUPERVISOR VIRTUAL (60000 - 157777) FOR 

THE 11/83 ! USER VIRTUAL (60000 - 157777) FOR ALL OTHERS. 



CALL 



MAPPER: 



MOV BANKN0.R3 
CALL MAPPER 
RETURN 



SET UP BANK ARGUEMENT 
ACTUAL CALL 
ONLY RETURN 



iSET SUPERVISOR/USER UP FOR 1 TO 1 MAP 
PUSH R0.R1.R2.R4.R5 



4$: 

004010 ZOi : 

35*; 
40^ 



5*; 
2«; 



MOV #KIPARO.RO 

MOV SSIPARO.Rl 

MOV #SIPDR0,R4 

TST NOSUPER 

BEQ 4$ 

MOV OUIPARO.Rl 

MOV #UIPDR0.R4 

MOV #77406, R2 

MOV *8..R5 

MOV (R0)*.(R1)* 

MOV R2.(R4)* 

SOB R5,l< 

MOV #177600, (Rl) 

CMP #5,PR0TYP 

BNE 40$ 

MOV 0SIPDR0+6.R4 

MOV #4..R5 

BIS #BIT15.(R4)* 

SOB R5,35* 

sSET UP SUPERVISOR/USER FOR 

CMP #200. R3 

BEQ 3$ 

ASH #9..R3 

MOV #SIPAR3,R1 

TST NOSUPER 

BEQ 5i 

MOV #UIPAR3.R1 

MOV #4,R2 

MOV R3.(R1)* 

ADO #200, R3 

SOB R2.2« 

TST SPLTCSR 

BEQ 9i 

SUB #10, Rl 

MOV R1,R2 

ADO #4,R2 



TEST 



MOV R0,-(SP) 
MOV Rl.-(SP) 
MOV R2.-(SP) 
MOV R4.-(SP) 
MOV R5,-(SP) 

FIRST AREA TO MAP TO 
FIRST ADDRESS REGISTER 
FIRST DESCRIPTOR REGISTER 
CAN WE USE SUPERVISOR MODE? 
YES, BRANCH 

FIRST ADDRESS REGISTER 
FIRST DESCRIPTOR REGISTER 
CONSTANT FOR 4K PAGE. UP, R/U 
COUNTER 

PUT IN SUPERVISOR ADDRESS 
PUT IN SUPERVISOR DESCRIPTOR 
LOOP TILL DONE 

CORRECT LAST FIELD FOR PERIPHERALS PAGE 

IS THIS A 11/73? 

BRANCH IF NOT 

POINT TO PDR 3 

C0UNTER=4 

SET UNCONDITIONAL CACHE BYPASS IN PDR3-6 
AREA 

MAP NOTHING (1 TO D? 
YES - SKIP 

BANK 1 STARTS AT 100.000 LESS 6 LSB'S 
FOR MEMORY MANAGEMENT « 1000 
SETUP FOR AUTO INCREMENTING 
DO UE HAVE SUPERVISOR MODE? 
YES - BRANCH 

SETUP FOR AUTO INCREMENTING 
COUNTER 

PLUG IN PAR INFO 
BUMP ADDRESS 4K 
LOOP TILL DONE 



cvMjAAo fisvii-j nenoRY diag. 

SUBR flAPPER 



F7 
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SEQ 0290 



9929 036116 

9930 036124 

9931 036126 

9932 036130 

9933 036132 

9934 036134 

9935 036136 

9936 036140 

9937 036144 

9938 036150 

9939 036152 

9940 036156 

9941 036160 

9942 036164 

9943 036170 

9944 036172 

9945 036176 

9946 036200 

9947 036204 

9948 036206 
9949 

9950 
9951 
9952 
9953 

9954 036210 

9955 036216 

9956 036220 

9957 036224 

9958 036226 

9959 036234 

9960 036236 

9961 036240 

9962 036246 

9963 036250 

9964 036254 

9965 036256 

9966 036264 

9967 036266 

9968 036274 
036274 
036276 
036300 
036302 
036304 

9969 036306 
9970 

99"»1 036310 
036310 
036312 
036314 
036316 
036320 

9972 036322 

9973 036324 

9974 036330 

9975 036334 



022737 
001403 
010200 
010102 
010001 
012122 
011112 
013700 
005737 
001403 
012700 
000402 
012700 
005737 
001403 
012701 
000402 
012701 
060021 
060011 



022737 
001010 
005737 
001423 
022737 
001017 
000404 
022737 
001012 
005737 
001404 
013737 
000403 
013737 

012605 
012604 
012602 
012601 
012600 
000207 



010046 
010146 
010246 
010346 
010446 
005000 
012701 
012702 
012703 



000001 002240 



10$: 



002104 
002140 

004000 

010000 
002456 

177652 

172252 



11$: 
12$: 



13$: 
14$: 



000007 
002454 
000007 

000177 
002456 
177652 
172252 



002556 9$: 

002102 

002102 7$: 
8$: 

177654 

172254 6$: 
3$: 



$I<MAP: 



CnP ffl.SPLTCSR 

BEQ 10$ 

MOV R2.R0 

MOV R1.R2 

MOV RO.Rl 

MOV CR1)*.(R2)* 

MOV (R1).(R2) 

MOV bankindex.ro 

TST INT64K 

BEQ 11$ 

MOV «4000.R0 

BR 12$ 

MOV #10000. RO 

TST NOSUPER 

BEQ 13$ 

MOV #UIPAR5,R1 

BR 14$ 

MOV #SIPAR5.R1 

ADD RO.(Rl)* 

ADO RO.(Rl) 
;IF WE ONLY HAVE AN 



124K SYSTEM, WE DON'T WANT TO TEST THE 
Q BUS DEVICE PAGE IS. INSTEAD, THE 
THE LAST 4I< TO 8-12K. ALSO. IF THERE 
A BANK 177 ON AN 11/83. THE PROGRAM WILL REMAP THE LAST 
TO 8-12K FOR THE SAME REASON. 
#7.LASTBANK 
7$ 



;LAST 4K. WHERE THE 
: PROGRAM WILL REMAP 
:IS 
:4K 
CMP 
BNE 
TST 
BEQ 
CMP 
BNE 
BR 
CMP 
BNE 
TST 
BEQ 
MOV 
BR 
MOV 
POP 



N022BIT 
3$ 

#7, BANK 
3$ 
8$ 

#177, BANK 
3$ 

NOSUPER 
6$ 

UIPAR5,UIPAR6 
3$ 

SIPAR5.SIPAR6 
R5,R4,R2,R1,R0 



11/83. 11/23-B OR 23? 

BRANCH IF SO 

BANK 7? 

NO - BRANCH 



172340 
077406 
172300 



RETURN 
.SBTTL 
PUSH 



CLR 
MOV 
MOV 
MOV 



MOV (SP 
MOV (SP 
MOV (SP 
MOV (SP 
MOV (SP 



)«.R5 
)*.R4 
)«.R2 
)*.R1 
)..R0 



TRAP MAP KERNEL (ALMOST 
RO.Rl, R2,R3.R4 



1 TO 1) TRAP HANDLER 



RO 

#KIPAR0,R1 
#77406. R2 
#KIPDR0.R3 



MOV HO.-(SP) 
MOV Rl.-(SP) 
MOV R2.-(SP) 
MOV R3.-(SP) 
MOV R4.-(SP) 

1ST AREA TO MAP TO 
FIRST ADDRESS 

CONSTANT FOR 4K PAGE.UP.R/W 
1ST PAGE DESCRIPTOR REGISTER 



G7 



CVMJAAO MSVll-J MEMORY DIAG. 
TRAP MAP KERNEL (ALMOST 1 
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TO 1) TRAP HANDLER 



9976 036340 012704 000010 

9977 036344 010021 

9978 036346 010223 

9979 036350 062700 000200 

9980 036354 077405 

9981 036356 012741 177600 

9982 036362 012741 177400 

9989 036366 
036366 012604 
036370 012603 
036372 012602 
036374 012601 
036376 012600 

9990 036400 000002 



1$: 



MOV 
MOV 
MOV 
ADO 
SOB 
MOV 
MOV 
POP 



RTI 



*8. .R4 

RO.(Rl)* 

R2.(R3)* 

*200.R0 

R4.1* 

*177600.-(R1) 
#177400. (Rl) 
R4,R3, R2.R1.ro 



COUNTER 

put in kernel address 

put in kernel discriptor 

add address constant for 4k change 

loop till done 

the peripherals page to kipar7 
and next louer page to kipar6 

MOV (SP)*.R4 

MOV (SP)*.R3 

MOV (SP)».R2 

MOV (SP)».R1 

MOV (SP)«.R0 



SEQ 0291 



H/ 
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TRAP MAP KERNEL (ALMOST 1 TO 1) TRAP HANDLER 

9993 036402 RELOCATE :SUBTST <<RELOCATE PROGRAM>> 

: ********* 
: ♦SUBTEST RELOCATE PROGRAM 

}***»f*****t******************************************00t************ ********* 

9994 036402 IF «»SU12 SET. IN 9SUR THEN $RETURN ERROR 

SJff?^ 9,1^1.11 ^**226 BIT «SU12.8SUR 

036410 001402 BEQ L356 

036412 000261 SEC 

036414 000207 RTS PC 

036416 L356:!;;:;! 

9995 036416 IF APTFLAG IS TRUE OR ACTFLAG IS TRUE 

036416 005737 002352 TST APTFLAG 

036422 001003 BNE L357 

036424 005737 002350 TST ACTFLAG 

036430 001405 BEQ L360 

036432 L357:;j:;:; 

9996 036432 IF $PASS NE #0 THEN $RETURN ERROR 

036432 005737 056654 TST JPASS 

036436 001402 BEQ L361 

036440 000261 SEC 

036442 000207 RTS PC 

036444 L361:!;s!!S 

9997 036444 END.- OF IF APTFLAG 

036444 L360:!;:!:! 

9998 036444 BEGIN LOADERBANK 

036444 B65:iii:i: 

9999 036444 FOR BANK »1 TO LASTBANK 

036444 012737 000001 002102 MOV «1.BANK 

036452 B66 ::::::: 

10000 036452 004737 040052 CALL EXBANK 

10001 036456 IF ACFLAG IS TRUE AND PFLAG IS FALSE AND BMFLAG IS FALSE 
036456 005737 002116 TST ACFLAG 
036462 001431 BEQ L362 
036464 005737 002122 TST PFLAG 
036470 001026 BNE L362 
036472 005737 002130 TST BMFLAG 
036476 001023 BNE L362 

10002 036b00 013700 002102 MOV BANK.RO 

10003 036504 010037 002432 MOV RO.LOADBANK 

10004 036510 013701 002576 MOV LOADHOME.Rl 

10005 036514 004737 037442 CALL BANKMOV 

10006 036520 004737 037774 CALL NEULOAD jMAP NEW LOADER BANK IN KERNEL 

10007 036524 013701 002104 MOV BANKINDEX.Rl 

10008 036530 052761 100000 002666 BIS #BIT15.C0NFIG*2(R1) ;MARK LOADER 

10009 036536 042761 020000 0026b6 BIC *BIT13.C0NFIG*2(R1) ; INVALIDATE BACKGROUND PATTERN 

10010 036544 LEAVE LOADERBANK 

036544 000416 BR E65 

10011 036546 END ;0F IF ACFLAG 

036546 L362 

10012 036546 END ;0F FOR BANK 

036546 005237 002102 INC BANK 

036552 023737 002102 002556 CMP BANK. LASTBANK 

036560 003734 BLE B66 

036562 E66:i 

10013 036562 IF «SU13 OFF. IN SSUR 

036562 032777 020000 144046 BIT #SU13.SSUR 

036570 001002 BNE L363 



SEQ 0292 



CVMJAAO MSVU-J MEMORY OIAG. 
RELOCATE PROGRAM 



10014 0d03rc 






Ood3 ic, 




A7A1 7A 


1 n/M C ATAC7A 






AT&C7A 












ATAC7A 






ATAAAA 

Odeow 
































ftl T7ft3 


ftftPSSA 






















ftl P7ft1 


ftftftftftA 


ATAAI A 












nXAAl A 




ftftftPftl 


ATAAPA 


001 OlS 










ATAAPA 


01P7ftl 


1 0ftftOO 


ATAft'^A 


001 Oil 
VOX 










AlAft'^A 


0117<tl 

\j^o fox 


OOP 1 Oft 


ATAAAA 


001 A?S 




1 nnsA nxAAAA 










000400 




001460 




100P7 0^66^^ 










000100 


0TAAA4 










OOOPOO 

vvvc vv 






















000AA7 




1 nnm nTA7nn 






ATA7AA 
















OOPSKi 




00100■^ 














1 mm 




01 01 "X? 


OOP<\dO 


























10036 036720 

A WW Www • W V 






036720 






10037 036720 






036720 






10038 036720 






036720 


062701 


000004 


036724 


020102 
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SEQ 0293 

TYPE MSG075 ; RELOCATION NOT POSSIBLE 

TYPEIT ,MSG075 
.DSA8L CRF 
END ;0F IF *SU13 

L363: 

$RETURN ERROR 

SEC 

RTS PC 

END LOADERBANK 

E65: 

BEGIN FINOBANK 

B67: :::::: 

MOV LASTBANK,R2 
ASL R2 

ASL R2 iR2 <- R2 ♦ 4 

FOR Rl := #2*2 TO R2 BY 04 

MOV «2*2. Rl 

g7Q 

IF #BIT7!BIT0 OFF. IN CONFIG(Rl) ;IF NO ERRORS t' NOT 'PROGRAM SPACE 
002664 BIT #BIT7!BIT0.C0NFIG(R1 ) 

BNE L364 

IF 0BIT15 OFF. IN C0NFIG*2(R1) ;IF NOT LOADER BANK 
002666 BIT #BIT15.C0NFIG«2(R1 ) 

BNE L365 

IF CPUBIT SET. IN CONFIG(Rl) ilF ACCESSABLE 
002664 BIT CPUBIT, CONFIG(Rl) 

BEQ L366 

IF OBITS OFF. IN C0NFIG*2CR1) THEN LEAVE FINOBANK :IF PARITY 
002666 BIT 0BIT8.C0NFIG»2(R1 ) 

BEQ E67 

IF #BIT6 SET. IN COnFIG(RI) AND #BIT7 OFF. IN CONFIGCRl) 
002664 BIT #BIT6. CONFIGCRl ) 

BEQ L367 

002664 BIT 0BIT7.C0NFIG(R1 ) 

BNE L367 

;IF 1ST PROTECTABLE ECC BANK 
LEAVE FINOBANK 

BR E67 

END ;0F IF #BIT6 

L367 

IF INHECC IS FALSE 

TST INHECC 
BNE L370 

SET INHECC 

002536 MOV 0 1. INHECC 

MOV Rl . INHBANK 
END J OF IF INHECC 

L370:;;!;s; 

END sOF IF CPUBIT 

L366: :::::: 

END ;0F IF #BIT15 

L365: i : : ; t i 

END ;0F IF #BIT7 

L364:::::;: 

END ;0F FOR 

ADO «4,R1 
CMP R1.R2 



J7 
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RELOCATE PROGRAM 



036726 


003733 










036730 












10039 036730 










IF FULLREL IS FALSE 


036730 


005737 


002542 








036734 


001012 










10040 036736 










IF INHECC IS TRUE 


036736 


005737 


002536 








036742 


001407 










10041 036744 


013701 


002540 






MOV INHBANK.Rl 


10042 036750 


023727 


002300 


000030 




CMP REALPAT . #30 


10043 036756 


001421 








BEQ RELENTl 


10044 036760 


000420 








BR RELENTl 


10045 036762 










END: OF IF INHECC 


036762 












10046 036762 










END; OF IF FULLREL 


036762 












10047 036762 


005037 


002536 






CLR INHECC 


1004S 036766 










IF «SU13 OFF. IN SSUR 


036766 


032777 


020000 


143642 






036774 


001006 










10049 036776 


023727 


002300 


000030 




CMP REALPAT, #30 


10050 037004 


001402 








BEQ SKUB 


10051 037006 










TYPE MSG075 


037006 


104401 


070176 






TYPEIT .MSG075 
•DSABL CRF 


10052 037012 










END sOF IF 0SU13 


037012 












10053 037012 








SKUB: 


^RETURN ERROR 


037012 


000261 










037014 


000207 










10054 037016 










END FINDBANK 


037016 












10055 037016 










CLEAR INHECC 


037016 


005037 


002536 








10056 037022 


042761 


020000 


002666 


RELENTl 


: BIC #BIT13,C0NFIG«2(R1) 


10057 037030 


005000 








CLR RO 


10058 037032 


071027 


000004 






DIV *4,R0 


10059 037036 








RELOCl: 


LET NEUBANK :« RO 


037036 


010037 


002310 








10060 037042 


013737 


002532 


002534 




MOV PGMCSR,PGMCSR*2 


10061 037050 


004737 


037610 






CALL USERMAP 


10062 037054 










USER 


037054 


052737 


140000 


177776 




BIS *BIT15!BIT14,PSU 
.DSABL CRF 


10063 037062 










BMOV 0.100000, SIZE 


037062 


004537 


041024 






JSR R5. BLOCKS 


037066 


040000 








SIZE 


037070 


100000 








100000 


037072 


000000 








0 

.DSABL CRF 


10064 037074 


104417 








KERNEL 


10065 037076 


042737 


000001 


177572 


JMPRLl : 


BIC #BITO,MMRO 


10066 037104 


004737 


037672 






CALL NEUKERNEL 


10067 037110 


013700 


002310 






MOV neubank.ro 


10068 037114 


006300 








ASL RO 


10069 037116 


006300 








ASL RO 


10070 037120 


016002 


002664 






MOV CONFI ^0),R2 



SEQ 0294 

BLE B70 
E70:si:i:i: 

TST FULLREL 
BNE L371 

TST INHECC 
BEQ L372 

:IS THIS PATTERN 30? 
{YES - SKIP MESSAGE 



L372:iii::: 

jMAKE SURE FLAG iFTURNED'oFF ! 

BIT 0SU13.9SUR 
BNE L373 

sis THIS PATTERN 30? 

sYES - SKIP MESSAGE 

i RELOCATION NOT POSSIBLE 



L373: 



SEC 

RTS PC 



• > • • I ■ 



E67! 

;IF UE RELOCATED PROPERLY. THIS SHOULD BE OFF! 

CLR INHECC 
{INVALIDATE BACKGROUND PATTERN 



MOV RO. NEUBANK 

:SAVE CURRENT PGM. CSR 
:MAP NEUBANK TO USER PAR 
i ENTER USER MODE 

sGO TO USER MODE 

iMOVE PROGRAM 



{ENTER KERNEL MODE 
{DEENERGIZE MEMORY MANAGEMENT 



{RO < RO * 4 



I<7 



CVMJAAO MSVll-J 


mehqry 
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RELOCATE PROGRAM 












10071 037124 


000302 






Pi IAD 

SUAB 


R2 




10072 037126 


042702 


Iff (OKI 




DTP 

Die 


*tC17 ,R2 




10073 037132 


006302 






A CI 

ASL 


R2 




10074 037134 


052737 




177572 


DTP 

BIS 


ralTO.nnRO 




10075 037142 


010237 






MOV 


R2 .PGnCSR 


. DIIT KICU DCtA PCD TlklTH DPMPCO 

;rUI NtH "bn. UbK INIU rbHCoH 


10076 037146 


032760 


n 1 nnnn 


OOZooD 


OTT 

BIT 




;l3 Inc. NcW dHNK INltnLcAVcU? 


10077 037154 


001412 






Dm 

BCQ 


If 


. QDAUrU TC UAT TUTCDl CAUCn 
iDKHNLn Ir NU 1 INlCKLcHVcU 


1007a 037156 


016002 






HUV 


CONrlGQKO^ «K2 




10079 037162 


042702 


SJSJ 1 f f f 




Die 


#rcl70000,R2 




10080 037166 


072227 


1 7777«; 




ACU 

Abn 


S-3,R2 




10081 037172 


052702 






DTC 

dI5 


?BITl3,K2 




10082 037176 


050237 






DTC 

BIS 


H2 , rbMCSR 




10083 037202 






1$ * 


dC 1 






037202 


012737 


177777 


002126 






MOV ft 


10084 037210 








$RETURN 


NOERROR 




037210 


000241 










CLC 


037212 


000207 










RTS PC 



SEQ 0295 



#-l.RLFLAG 



CVMJAAO MSVll-J MEMORY DIAG. 
RFLOCATE PROGRAM 

10087 037214 



10088 
10089 

10090 
10091 
10092 
10093 
10094 

10095 
10096 
10097 
10098 
10099 
10100 
10101 
10102 
10103 

10104 

10105 
10106 



L7 
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UNRELOCATE:SUBTST <<UNRELOCATE PROGRAM >> 

f ******************************** fti 

i*SUBTEST UNRELOCATE PROGRAM 

■**************************i 



SEQ 0296 



037214 
037214 
037216 
037222 
037226 
037232 
037236 
037236 
037242 
037250 
037254 
037260 
037266 
037274 
037300 
037304 
037312 
037312 
037316 
037316 



010046 
013701 
013700 
004737 
004737 

013746 
013737 
004737 
013701 
042761 
013737 
004737 
015701 
042761 



002432 
002576 
037442 
037774 

002102 
002432 
040052 
002104 
100000 
002576 
040052 
002104 
020000 



002102 



002666 
002102 



002666 



012637 002102 
005037 002536 



{RESTORE LOADERS 


PUSH 


RO 


MOV 


LOADBANK.Kl 


MOV 


LOADHOME ,R0 


CALL 


BANKMOV 


CALL 


NEULOAD 


PUSH 


BANK 


MOV 


LOADBANK.BANK 


CALL 


EXBANK 


MOV 


BANKINDEX.Rl 


BIC 


#BIT15.C0MFIG*2(R1) 


MOV 


LOADHOME, BANK 


CALL 


EXBANK 


MOV 


BANKINDEX.Rl 


BIC 


#BIT13,C0NFIG*2(R1) 


POP 


BANK 


CLEAR 


INHECC 



MOV RO. (SP) 



;MAP NEW LOADER BANK IN KERNEL SPACE 



MOV BANK.-(SP) 



: CLEAR LOADER FLAG 



; INVALIDATE BACKGROUND PATTERN 

MOV (SP)*.BANK 
{MAKE SURE ECC TESTS ARE NOT INHIBITED! 

CLR INHECC 



: RESTORE BANK 0 



10107 


037322 


042737 


020000 


002666 




BIC #BIT13.C0NFIG*2 


: INVALIDATE BACKGROUND PATTERN 


10108 


037330 










LET NEUBANK 00 






037330 


005037 


002310 








CLR NEUBANK 


10109 


037334 


004737 


037610 






CALL USERMAP 


:MAP NEUBANK TO USER PAR 


10110 


037340 










USER 


i ENTER USER MODE 




037340 


052737 


140000 


177776 




BIS #BIT15!BIT14.PSW 


sGO TO USER MODE 














.DSABL CRF 




10111 


037346 










BMOV 0,100000, SIZE 


jMOVE PROGRAM 


037346 


004537 


041024 






JSR R5, BLOCKS 






037352 


040000 








SIZE 






037354 


100000 








100000 






037356 


000000 








0 
















.DSABL CRF 




10112 


037360 


104417 








KERNEL 


: ENTER KERNEL MODE 


10113 


037362 


042737 


000001 


177572 




BIC OBITO.MMRO ^. 


:DEENERGIZE MEMORY MANAGEMENT 


10114 


037370 


004737 


037672 






CALL NEUKERNEL 




10115 


037374 


013737 


002534 


002532 




MOV PGMCSR*2.PGMCSR 


s RESTORE PREVIOUS PGM. GSR 


10116 


037402 


052737 


000001 


177572 




BIS #BITO.MMRO 


; ENERGIZE MEMORY MANAGEMENT 


10117 


037410 


005037 


002126 






CLR RLFLAG 




10118 


037414 


012700 


002666 




1*: 


MOV ffC0NFIG*2.R0 


MOVE 2ND UORD OF CONFIG TO RO 


10119 


037420 


042710 


020000 




2i: 


BIC #BIT13.(R0) 


CLEAR BACKGROUND VALID BIT 


10120 


037424 


062700 


000004 






ADD ff4.R0 


INCREMENT TO NEXT BANK 


10121 


037430 


020027 


003620 






CMP R0.*3620 


DONE? 


10122 


037434 


003771 








BLE 2i 


NO - BRANCH 


10123 


037436 










POP RO 






037436 


012600 










MOV (SP)«.RO 


10124 


037440 


000207 








RETURN 




10125 

















I 



CVMJAAO MSVll-J MEMORY DIAG. 
UNRELOCATE PROGRAM 

10128 037442 



10129 
10130 
10131 
10132 

10133 037442 

10134 037444 

10135 037450 

10136 037452 

10137 037454 
10136 037460 

10139 037464 

10140 037470 
10141 

10142 037474 

10143 037476 

10144 037500 

10145 037502 
10146 

10147 037504 
10140 037506 

10149 037510 

10150 037512 
10151 

10152 037514 
037514 



10153 037522 
037522 
037526 
037530 
037532 



104415 

004737 037610 

104416 

104415 

072027 000011 
072127 000011 

012702 177650 

012703 000200 

010122 
060301 
010122 
060301 

010022 
060300 
C10022 
060300 



052737 140000 177776 



004537 041024 

020000 
140000 
100000 



M7 
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BANKMOV:SUBTST <<nOVE BANKS>> 

:*SUBTEST MOVE BANKS 

:MOVE 3/4 OF A BANK 
: CALLING SEQUENCE 
;R0 > DESTINATION BANK 
iRl - SOURCE BANK 
SAVREG 

USERMAP 



SEQ 0297 



CALL 
RESREG 
SAVREG 
ASH 
ASH 
MOV 
MOV 

MOV 
ADD 
MOV 
ADD 

MOV 
ADD 
MOV 
ADD 



09.. RO 
«9.,R1 
«UIPAR4.R2 
«200,R3 

R1.(R2)* 
R3.R1 
R1.(R2)* 
R3.R1 

R0.(R2)* 
R3.R0 
R0.(R2)* 
R3,R0 



;MAP 1ST HALF BANK 
{BUMP BY 4K 



USER 
BIS 
.DSABL 
BMOV 



10154 
10155 
10156 
10157 
10156 
10159 
10160 
10161 
10162 
10163 
10164 
10165 
10166 
10167 
10166 



037534 104417 

037536 012702 177650 



*BIT15!BIT14.PSW 
CRF 

100000, 140000. SIZE/2 
JSR R5.BL0CK3 
SIZE/2 
140000 
100000 

.DSABL CRF 
KERNEL 



sGO TO USER MODE 
:M0V 1ST HALF BANK 



; ENTER KERNEL MODE 



037542 
037544 

037546 
037550 

037552 
037554 
037556 
037560 

037562 
037562 



10169 037570 
037570 
037574 
037576 



010122 
060301 
010122 
060301 

010022 
060300 
010022 
060300 



052737 140000 177776 



004537 041024 

010000 

140000 



MOV 

MOV 
ADD 
MOV 
ADD 

MOV 
ADO 
MOV 
ADD 

USER 
BIS 
.DSABL 
BMOV 



«UIPAR4.R2 

R1.(R2)* 
R3.R1 
R1.(R2)* 
R' Rl 

R0.(R2)* 
R3.R0 
R0.(R2)* 
R3.R0 



iMAP 2ND HALF BANK 
iBUMP BY 4K 



«BIT15!BIT14.PSU 
CRF 

100000 . 140000 . SIZE/4 
JSR R5. BLOCKS 
SIZE/4 
140000 



sGO TO USER MODE 
:M0V 3ND FOURTH OF BANK 



N7 
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MOVE BANKS 

037600 100000 100000 

.DSABL CRF 

10170 037602 104417 KERNEL : ENTER KERNEL MODE 

10171 

10172 037604 104416 RESREG 

10173 037606 000207 RETURN 



CVMJAAO MSVll-J MEMORY 01 AG. 
MOVE BANKS 



10176 


037610 






10177 


037610 


012701 


177640 


10178 


037614 


012702 


172340 


10179 


037620 


012703 


177600 


10180 


037624 


012704 


172300 


10181 


037630 


012705 


000004 


10182 


037634 


012221 




10183 037636 


011423 




10184 


037640 


077503 




10185 








10186 


037642 


013700 


002310 


10187 


037646 


072027 


000011 


10188 








10189 


037652 


012705 


000004 


10190 


037656 


010021 




10191 


037660 


062700 


000200 


10192 


037664 


011423 




10193 


037666 


077505 




10194 


037670 


000207 




1C195 








10196 037672 







10197 


037672 








037672 


010046 






037674 


010146 






037676 


010546 




10198 


037700 


012700 


172340 


10199 


037704 


013701 


002310 


10200 


037710 


072127 


000011 


10201 








10202 


037714 


012705 


000004 


10iJ03 037720 


010120 




10204 


037722 


062701 


000200 


10205 


037726 


077504 




10206 


037730 








037730 


012605 






037732 


012601 






037734 


012600 




10207 


037736 


000207 




10208 








10209 


037740 







10210 

10211 037740 

10212 037744 

10213 037750 

10214 037756 

10215 037762 

10216 037766 

10217 037772 



013705 
072527 
013737 
010537 
062705 
010537 
000207 



002102 
000011 
172350 
172350 
000200 
172352 
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L?SERMAP:SUBTST <<SUBR MAP USER TO NEU BAW<>> 
; •SUBTEST SUBR MAP USER TO NEW BANK 



SEQ 0299 



1$: 



2^ 



MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
SOB 

MOV 

ASH 

MOV 
MOV 
ADD 
MOV 
SOB 

RETURN 



9UIPAR0.R1 
«KIPAR0.R2 
#UIP0R0.R3 
#KIP0R0,R4 
#4.R5 

(R2)».(R1)» 

(R4).(R3)» 

R5.1J 

NEUBANK.RO 
#9. .RO 

#4.R5 
R0,(R1)» 
#200. RO 
(R4).(R3)» 
RS.2$ 



;COPY KERNEL PAR'S t POP'S (0-3) 



:BANK 1 STARTS AT 100,000 LESS 6 LSB'S 
sFOR MEMORY MANAGEMENT « 1000 

SETUP UIPAR(4-7) 
BUMP ADDRESS 4K 
SETUP UIPDR(4-7) 



NEUKERNEL:SUBTST <<SUBR SETUP KERNEL PAR'S FOR NEU BANK>> 

{•SUBTEST SUBR SETUP KERNEL PAR'S FOR NEU BANK 

PUSH R0.R1,R5 

MOV RO.-(SP) 
MOV Rl.-(SP) 
MOV R5.-(SP) 



MOV 


OKIPARO.RO 


MOV 


NEUBANK.Rl 


ASH 


*9.,R1 


MOV 


#4.R5 


MOV 


R1.(R0)» 


ADD 


«00.R1 


SOB 


R5,l$ 


POP 


R5,R1,R0 



RETURN 



:BANK 1 STARTS AT 100.000 LESS 6 LSB'S 
;F0R MEMORY MANAGEMENT « 1000 

;SETUP KIPAR(0-3) 



MOV (SP)«.R5 
MOV (SP)*.R1 
MOV (SP)*,RO 



MAPKERNAL:SUBTST <<SUBR MAP KERNAL PARS 4 AND S TO A BANK>> 
{•SUBTEST SUBR MAP KERNAL PARS 4 AND 5 TO A BANK 

; ************* ttttttttttAt^^^t^^^^^^ •••••••••••••••••••••••••••• •••••••••••••••• 



002272 



MOV BANK.RS 

ASH «9. .R5 

MOV KIPAR4,SAVPAR 

MOV R5.KIPAR4 

ADD 0200. R5 

MOV R5.KIPAR5 

RETURN 



MOV BANK NUMBER TO R5 

R5 ENTERS 100000 LESS SHIFT TO CREATE MAPPING 
SAVE OLD PAR 
GET NEU PAR'S 



CVMJAAO MSVll-J f«MORY OIAG. 
SiX)R MAP KERNAL PARS 4 AND 

10218 

10219 037774 
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SEO 0300 



10220 

10221 037774 
037774 



010046 



040020 
040022 
1022u 040024 
10229 

10230 040026 



012601 
012600 
000207 



NEUL0A0:SUBTST <<SUBR SETUP KERNEL PAR'S FOR NEU LOADER BAW>> 
{♦SUBTEST SUBR SETUP KERNEL PAR'S FOR HEU LOADER BANK 

; ******************************************************************** 

sRO CONTAINS THE DESTINATION BANK 



PUSH 



RO.Rl 





037776 


010146 










10222 


040000 


012701 


172350 


MOV 


ffKIPAR4,Rl 




10223 


040004 


072027 


000011 


ASH 


#9..R0 


iBANK 1 STARTS 


10224 


040010 


010021 




MOV 


R0.(R1)» 


: SETUP KIPAR4 


10225 


040012 


062700 


000200 


ADD 


«200,R0 




10226 


040016 


010021 




MOV 


RO.CRD* 


: SETUP KIPAR5 


10227 


040020 






POP 


Rl.RO 





MOV RO.-(SP) 
Mo; Rl.-(SP) 



6 LSB'S (1000) 



RETURN 



MOV 
MOV 



(SP)^ 
(SP)^ 



.Rl 
,R0 



10231 040026 013737 002272 172350 

10232 040034 062737 000200 002272 

10233 040042 013737 002272 172352 

10234 040050 000207 



UNMAP: SUBTST <<SUBR UNMAP KERNAL PAR'S 4 AND 5>> 

; ******************************************************************************* 

.•♦SUBTEST SUBR UNMAP KERNAL PAR'S 4 AND 5 

; ******************************************************************************* 

MOV SAVPAR.KIPAR4 ; RESTORE KIPAR4 

ADO #200,SAVPAR :ADD 200 FOR NEXT PAR 

MOV SAVPAR,KIPAR5 j RESTORE KIPAR5 

RETURN : 



D8 



CVMJAAO MSVll-J HEMORY OIAG. 
SUBR UNMAP KERNAL PAR'S 4 

10237 040052 



10238 
10239 
10240 
10241 
10242 
10243 
10244 
10245 
10246 
10247 
10246 
10249 
10250 
10251 
10252 
10253 
10254 
10255 
10256 

10257 040052 
040052 
040054 
040056 

10258 040060 
040060 
040064 

10259 040070 
040070 

10260 040076 
040076 
040102 
040106 

10261 040112 
040112 
040116 
040122 

10262 040126 

10263 040132 

10264 040134 

10265 040136 

10266 040142 

10267 040150 

10268 040152 
040152 

10269 040160 

10270 040164 
040164 
040170 
040172 
040176 

10?71 040200 
10272 040204 
040204 
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AND 5 

EXBANK: SUBTST <<SUBR EXAMINE BANK>> 
******************************************************************************* 

•SUBTEST SUBR EXAMINE BANK 

DOES THE FOLLOUING: 

SETS UP "BANKINDEX" AND Rl BASED ON VALUE OF "BANK". 
"MKFLAG" IF THE BANK IS ECC. 

-KPFLAG" IF THE BANK IS THE PROTECTED REGION OF ECC MEMORY. 
"ACFLAG" IF THE BANK CAN BE ACCESSED BY THIS CPU. 
"PFLAG" IF THE BANK IS IN PROGRAM SPACE. 
"RRFLAG" IF RELOCATION IS REQUIRED TO TEST THIS BANK; HOWEVER. 
IT COMPLEMENTS THIS FLAG IF THE RELOCATION FLAG "RLFLAG" IS SET (THIS IS 
NECESSARY FOR THE USE OF THE RECURSIVE "MODE" SUBROUTINES). THE "RRFLAG" 
IS ALWAYS SET TO DISABLE TESTING IF FIELD SERVICE MODE "SELECTED BANKS" 
ARE BEING TESTED AND THIS BANK IS NOT SELECTED. 

IF THE BANK lb A BAD MEMORY; HOWEVER. IT COMPLEMENTS 
"WORST" FLAG IS NOT SET (THIS IS NECESSARY FOR THE USE 
"MODE" SUBROUTINES). 
IF THE BANK IS INTERLEAVED. 

(9) SETS THE "INT64K" FLAG IF THE BANK IS INTERLEAVED ON 64K WORD BOUNDS. 

(10) SETS THE "SKIPMK" FLAG IF THIS BANK IS INTERLEAVED. AND HAS ALREADY 
BEEN TESTED. 



SEQ 0301 



(1) 
(2) 
(3) 
(4) 
(5) 
(6) 



(7) 



SETS THE 
SETS THE 
SETS THE 
SETS THE 
SETS THE 



SETS THE "BMFLAG' 
THIS FLAG IF THE 
OF THE RECURSIVE 
(8) SETS THE "INTFLAG' 



010046 
010146 
010246 

005037 002120 
005037 002114 

012737 177777 002116 



005037 
005037 
005037 

005037 
005037 
005037 
013701 
006301 
006301 
010137 
032761 
001403 

012737 
012700 

030037 
001405 
030061 
001002 
005037 



002122 
002124 
002130 

002136 
002140 
002342 
002102 



002104 

000100 002664 



177777 002114 
000002 

002106 

002664 

002116 



PUSH R0.R1.R2 

CLEAR MKFLAG.KPFLAG 

SET ACFLAG 

CLEAR PFLAG. RRFLAG. BMFLAG 

CLEAR INTFLAG. INT64K. SKIPMK 



MOV RO.-(SP) 
MOV Rl.-(SP) 
MOV R2.-(SP) 



;R1 <- Rl * 4 



MOV BANK.Rl 

ASL Rl 

ASL Rl 

MOV Rl. BANKINDEX 

BIT #BIT6.C0NFIG(R1) 

BEQ 1$ 

SET KPFLAG 

MOV OBITl.RO 

IF RO SET. IN CPU6IT AND RO OFF. IN CONFIG(Rl) 



CLR 
CLR 

MOV 

CLR 
CLR 
CLR 

CLR 
CLR 
CLR 



MKFLAG 
KPFLAG 

#-1. ACFLAG 

PFLAG 

RRFLAG 

BMFLAG 

INTFLAG 

INT64K 

SKIPMK 



;PROTECTED REGION OF ECC MEMORY? 
:N0 - SKIP 



CLR ACFLAG 
END iOF IF RO 



MOV #-1. KPFLAG 



BIT RO.CPUBIT 
BEQ L374 

BIT RO.CONFIGCRl) 
6NE L374 



L374: 



CVMJAAO 


MSVll-J 


MEMORY 


DIAG. 


MACRO 


SUBR 


EXAMINE 


BANK 






10273 


040204 


005737 


002116 




10274 


040210 


001415 






10275 


040212 


016102 


002666 




1 10276 


040216 


000302 






' 10277 


040220 


042702 


177770 




10278 


040224 


020227 


000003 




10279 


040230 


003405 






10280 


040232 










040232 


012737 


177777 


002130 


10281 


040240 


000137 


040446 




10282 


040244 


032761 


000400 


002666 


10283 


040252 


001403 






10284 


040254 










040254 


012737 


177777 


002120 


10285 


040262 


032761 


000200 


002664 


10286 


040270 


001406 






10287 


040272 










040272 


012737 


177777 


002122 




040300 


012737 


177777 


002124 


10288 


040306 


005737 


002126 




10289 040312 


001402 






10290 


040314 


005137 


002124 




10291 


040320 


032761 


000001 


002664 


10292 


040326 


001403 






10293 


040330 










040330 


012737 


177777 


002130 


10294 


040336 


005737 


002600 




10295 


040342 


001002 






10296 


040344 


005137 


002130 




10297 


040350 










040350 


005737 


002002 






040354 


001407 








040356 


032761 


040000 


002666 




040364 


001003 






10298 


040366 










040366 


012737 


177777 


002124 


10299 


040374 










040374 








10300 


040374 


032761 


010000 


002666 


10301 


040402 


001421 






10302 


040404 










040404 


012737 


177777 


002136 


10303 


040412 


032761 


004000 


002666 


10304 


040420 


001403 






1030S 040422 










040422 


012737 


177777 


002140 


10306 


040430 


032761 


000040 


002664 


10307 


040436 


001403 






10308 


040440 










040440 


012737 


177777 


002342 


10309 


040446 










040446 


012602 








040450 


012601 








040452 


012600 






10310 


040454 


000207 







5$: 



8$: 

9*: 



ENEXBK 



E8 
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SEQ 0302 



TST 


ACFLAG 


: ACTIVE MEMORY? 


BEQ 


2$ 


{BRANCH IF NOT 


MOV 


C0NFIG«2(R1),R2 


SUAB 


R2 




BIC 


<»tC7.R2 


! ISOLATE MEM TYPE BITS 


CMP 


R2.«3 


;IS THIS AN ILLEGAL MEM TYPE? 


BLE 


21 


{BRANCH IF NOT 


SET 


BMFLAG 


sSET BAD BANK FLAG 






MOV 


JMP 


ENEXBK 


{JUMP OVER REST OF FLAG TESTS 


BIT 


*6IT8,C0NFIG»2(R1) 


{IS THERE ECC THERE? 


BEQ 


li 


{NO - SKIP 


SET 


MKFLAG 


{YES - SET MKFLAG 






MOV 


BIT 


#BIT7.C0NFIG(R1) 


{BANK > PROGRAM SPACE? 


BEQ 


5i 


:N0 - SKIP 


SET 


PFLAG.RRFLAG 





TST RLFLAG 

BEQ 6$ 

COM RRFLAG 

BIT #BIT0.C0NFIG(R1) 

BEQ 8< 

SET BMFLAG 

TST WORST 

BNE 9« 

COM BMFLAG 



IF SELONLY IS TRUE AND #BIT14 OFF. IN C0NFIG»2(R1) 



«-l. BMFLAG 



»-l. MKFLAG 



MOV »-l,PFLAG 
MOV »-l. RRFLAG 

IS PROGRAM RELOCATED? 
NO - SKIP 

YES - COMPLEMENT RELOCATION REQUIRED FLAG 
ERRORS PRESENT IN THIS BANK? 
NO - SKIP 

MOV #-1. BMFLAG 
IS THIS A WORST FIRST PASS? 
YES - SKIP 

NO - COMPLEMENT BAD MEMORY FLAG 



SET RRFLAG 
END {OF IF SELONLY 



TST SELONLY 
BEQ L375 

BIT #BIT14.C0NFIG*2{R1J 
BNE L375 

MOV 9 1. RRFLAG 



BIT 
BEQ 
SET 

BIT 
BEQ 
SET 

BIT 
BEQ 
SET 

POP 



RETURN 



#BIT12.C0NFIG«2(R1) 

ENEXBK 

JNTFLAG 

#BIT11.C0NFIG«2(R1) 
10$ 

INT64K 

#BIT5.C0NFIG(R1) 

ENEXBK 

SKIPMK 

R2.R1.ro 



• • I > I • 



L375: 

{IS THIS BANK INTERLEAVED? 
{BRANCH IF IT IS NOT 

MOV «-l,INTFLAG 
{IS THIS BANK INTERLEAVED WITH 64K BOARDS? 
{BRANCH IF IT IS NOT 

MOV »-l.INT64K 
{SHOULD THIS BANK BE TESTED? 
{BRANCH IF IT SHOULD 



{RESTORE REGISTERS 



MOV SKIPMK 

MOV (SP)».R2 
MOV (SP)».R1 
MOV (SP)«.RO 



CVMJAAO MSVll-J MEMORY OIAG. 
SUBR EXAMINE BANK 

10313 040456 



10314 
10315 
10316 

10317 040456 

10318 040462 

10319 040464 

10320 040470 

10321 040472 
10322 

10323 040474 

10324 040474 



10325 
10326 

10327 040474 

10328 040500 

10329 040506 
10330 

10331 040510 

10332 040510 



10333 040510 

10334 040516 
10335 

10336 040520 



10337 

10338 040520 

10339 040524 

10340 040532 



013700 
005100 
013701 
074001 
000207 



005237 
022737 
000207 



012737 
000207 



005237 
023737 
000207 



002134 
002120 



002112 
000030 



000027 002112 



002102 
002556 
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BANKOK: SUBTST <<SUBR BANK 0K?>> 
{♦SUBTEST SUBR BANK OK? 

; ******************************************************************** ttttt****** 

;TEST TO INSURE THAT THE TYPE OF MEMORY IN THE PRESENT BANK 

ilS OF THE TYPE UE ARE TESTING "TMFLAG". 

s RESULT IS RETURNED IN THE CONDITION CODES (OK » (-0)). 

MOV TMFLAG.RO 

COM RO 

MOV MKFLAG.Rl 

XOR RO.Rl 

RETURN ;0K = (=0K) 

INCRPT : 

INCPAT: SUBTST <<SUBR INCREMENT PATTERN TESTING >> 

;******************************************************************************* 

{♦SUBTEST SUBR INCREMENT PATTERN TESTING 

; ******************************************************************************* 

{INCREMENT THE PATTERN £ SET UP THE CONDITION CODES 
{RESULT - Z BIT SET INDICATES OVERFLOW 
INC PATTERN 

002112 CMP *30, PATTERN :SET UP CONDITION CODES 

RETURN {NOT EQUAL TO ZERO IS GOOD (NO OVERFLOU) 

SETPAT : 

HIPAT: SUBTST <<SUBR SET HIGHEST PATTERN TESTING TYPE>> 

;*********************************************************************^********t 

{♦SUBTEST SUBR SET HIGHEST PATTERN TESTING TYPE 

;**********************************************************************t^t^t**** 

MOV *27, PAT TERN {SET HIGHEST PATTERN 

RETURN 

INCBNK: SUBTST <<SUBR INCREMENT BANK TEST>> 

;******************************************************************************* 

{♦SUBTEST SUBR INCREMENT BANK £ TEST 

;***********************************************************^t****************** 



SEQ 0303 



002102 



{RESULTS RETURNED IN CONDITION CODES 
INC BANK 

CMP LASTBANK.BANK {TOO FAR? 

RETURN 



CVMJAAO MSVll-J MEMORY 01 AG. 
SUeR INCREMENT BANK L TEST 

10343 040534 



10344 
10345 
10346 
10347 
10348 
10349 



10350 


040534 


104472 




10351 


040536 








040536 


012737 


040600 


10352 


040544 








040544 


005737 


002126 




040550 


001402 






040552 


004737 


037214 




040556 






10353 


040556 


004737 


022200 


10354 


040562 


104421 




10355 


040564 


005737 


002454 


10356 


040570 


001003 




10357 


040572 


042737 


000040 


10358 


040600 


000005 




10359 


040602 


000000 




10360 
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SEQ 0304 



000004 



172516 



QUIT: SUBTST <<QUIT ROUTINE >> 
:*SUBTEST QUIT ROUTINE 

********** 

: INITIALIZE ALL GSR'S 
;UNRELOCATE IF NECESSARY 
: FLUSH OUT ANY DBE'S 
;TURN OFF MEMORY MANAGEMENT 
:TURN OFF THE Q-BUS MAP 
;HALT 

ECCINIT jTRAP ON DOUBLE BIT ERRORS (NORMAL) 

SET4 #QUIT1 : TRAPS TO 4 GOTO QUITl 

MOV #QUIT1.4 
. DSABL CRF 

IF RLFLAG IS TRUE THEN $CALL UNRELOCATE 

TST RLFLAG 
BEQ L376 

JSR PC. UNRELOCATE 
L376::::::i 

; FLUSH OUT DBE'S 
jTURN OFF MEMORY MANAGEMENT 

sIS THIS AN 11/83. 11/23-B OR 11/23? 



CALL MT0030 
DEENERGIZE 

TST N022BIT 

BNE QUITl 

BIC #BIT5.MMR3 
QUITl: RESET 
HALT 



;TURN OFF THE Q-BUS MAP 



cvnjAAo Msvii-j rcnoRY oiag. 

QUIT ROUTINE 
10363 040604 



10364 
10365 



10366 
10367 



10366 
10369 
10370 

10371 
10372 



10373 
10374 
10375 
10376 
10377 
10378 
10382 
10383 



040604 
040610 
040610 
040614 
040616 
040622 
040624 
040624 
040626 
040626 
040630 
040630 
040632 
040636 
040636 

040636 



10384 



10385 
10386 

10387 
10388 
10389 
10390 
10391 
10392 
10393 
10397 
10398 
10399 



040636 
040640 
040640 
040644 
040646 
040652 
040652 
040652 
040656 
040660 
040664 
040664 
040664 
040670 
040674 
040700 
040702 
040706 
040710 
040716 

040720 



004737 040636 

005737 002352 
001003 

005737 002350 
001402 

000777 

000403 

000000 

000137 003670 



104472 

005737 
001402 
004737 



005737 
001002 
004737 



012700 
013701 
004737 
104421 
005737 
001003 
042737 
000207 



002126 
037214 

002436 
022200 

000001 
002576 
037442 

002454 

000040 



10400 040720 
040720 



010346 
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SEQ 0305 

EXIT: SUBTST <<HALT PROGRAM>> 

:4'SUeTEST HALT PROGRAM 

CALL SHUTUP 
EXIT2: IF APTFLAG IS TRUE OR ACTFLAG IS TRUE 

TST APTFLAG 
BNE L377 
TST ACTFLAG 
BEQ L400 
L377:;;s;j{ 

BR 
ELSE 

BR L401 
L400:i;:ii: 

JEXHALT: HALT 

JMP START 
END jOF IF APTFLAG 

L401 ::::::: 

SHUTUP: SUBTST <<SHUTDOUN DIAGNOSTIC>> 

:*SUBTEST SHUTDOWN DIAGNOSTIC 

{INITIALIZE ALL CSR'S 

sUNRELQCATE 

; FLUSH GUT DBE'S 

{RESTORE LOADERS 

;TURN OFF MEMORY MANAGEMENT 

;UNMAP THE Q-BUS MAP 

ECCINIT ;TRAP ON DOUBLE BIT ERRORS (NORMAL) 

IF RLFLAG IS TRUE THEN *CALL UNRElOCATE 

TST RLFLAG 
BEQ L402 

JSR PC. UNRELOCATE 

L402: :::::: 

IF QUICK IS FALSE 

TST QUICK 
BNE L403 

CALL MT0030 ; FLUSH OUT DBE'S 

END :0F IF QUICK 

L403:ii:ii: 

MOV #1.R0 : DESTINATION BANK 

MOV LOADHOME.Rl : SOURCE BANK 
CALL 6ANKM0V 

OEENERGIZE jTURN OFF MEMORY MANAGEMENT 

TST N022BIT {DOES THIS PDP-11 HAVE 22-BIT ADDR? 

BNE U {BRANCH IF NOT 

172516 BIG #BIT5.MMR3 {TURN OFF Q-BUS MAP 

1«: RETURN 

APTDOUN: SUBTST <<APT SHUTDOWN SEQUENCE>> 
{♦SUBTEST APT SHUTDOWN SEQUENCE 

******************************************************************************** 

MAP #0 {MAP SUPERVISOR SPACE (TEST AREA) TO BANK 00 

MOV R3.-{SP) 



CVMJAAO MSVll-J MEMORY DIAG. 
APT SHUTDOUN SEQUENCE 
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040722 
040726 

040732 

10401 040734 
040734 

10402 040742 

10403 040750 

10404 040756 

10405 040764 

10406 040766 



012703 
004737 

012603 

053737 

012737 
012737 
012737 
104417 
000000 



000000 
035716 



002552 177776 



040720 
000340 
000000 



060024 
060026 
120720 



SEQ 0306 



MOV 

CALL 

.DSABL 



#0.R3 

MAPPER 

CRF 



! ENTER TEST MODE 



KERNEL 
APTHLT: HALT 



TESTAREA 

BIS TESTMODE.PSU 
.DSABL CRF 
MOV »APTD0UN. FIRST* 24 
MOV #340, FIRST 4 26 
MOV »0. FIRST 4APTD0UN 

: ENTER KERNEL MODE 



MOV (SP)«.R3 



:G0 TO SYSTEM TEST MODE 



CVMJAAO MSVll-J MeMORY DIAG. 
APT SHUTDOWN SEQUENCE 

10409 040770 



10410 
10411 
10412 
10413 
10414 
10415 
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SUBTST <<BLOCK MOVE SUBROUTINE >> 
.•♦SUBTEST BLOCK MOVE SUBROUTINE 

; ******************************************************************************* 

! BLOCKS HAS 3 ARGUErCNTS 
(BL0CK2 HAS 2 ARGUEMENTS 
;BL0CK1 HAS 1 ARGUEMENTS 

ALL ARE CALLED BY THE BMOV MACRO 
ENABL LSB 



SEQ 0307 



4 Ail 4 

10416 040770 






BLOCKl : 


PUSH 


R0,R1,R2 






040770 


A 1 AAA C 

010046 










MOV 


RO . - ( SP ) 


040772 


Al Al AC 

010146 










MOV 


Rl. (SP) 




Al A')A£ 

010246 










MOV 


R2. -(SP) 


• Ail 1 ^ AilA?^£ 

10417 040776 


A1 ^^A^ 

012702 






MOV 


Or ASTCITY , R2 




4 Ail 1 A fiA 1 AA ^ 

10416 041002 


Al ^^A1 

012701 






MA\i 

nuv 


Al C D 1 

<7l6. ,R1 






I Ail 1 O Ail 1 AA£ 

10419 041006 


AAAA 1 V 

000413 






BR 


3» 






4 Ail 

10420 
















lA^^I Ail 1 A1 A 

10421 041010 






DL0LK2 : 


PUSH 


OA Dl D^ 

R0,K1,R2 






AA 1 A 1 A 


Al TiAA^ 

01U04D 










nuv 


DA t CD ^ 

KO . - 1 SP J 


f\A 1 A1 O 


Al Al AC 










MA\/ 

nov 


D 1 / CD ^ 

Kl . - C5r J 


AA 1 A 1 A 


A I f\OAti 
Ui0240 










MAI/ 

nuv 


DO t CD ^ 

K2, -QSP J 


1AAOO AA1A1& 

IQmg 041016 


Al 07A1 

012 '01 


AAAA 5 A 

OOOOeU 




nuv 








1AA9V AA1A99 

10423 041022 


000404 






no 


2* 






10424 
















10425 041024 






BL0CK3: 


PUSH 


R0.R1.R2 






041024 


010046 










MOV 


RO.-(SP) 


041026 


010146 










MOV 


Rl.-(SP) 


041030 


010246 










MOV 


R2.-(SP) 


10426 041032 


012501 






MOV 


(R5)*.R1 




10427 041034 


012502 




2$: 


MOV 


(R5)»,R2 






10428 041036 


012500 




3$: 


MOV 


(R5)».R0 






10429 
















10430 041040 


012022 




1*: 


MOV 


(R0)».(R2)» 






10431 041042 


077102 






SOB 


Rl.l* 






10432 041044 








POP 


R2.R1.ro 






041044 


012602 










MOV 


(SP)».R2 


041046 


012601 










MOV 


(SP)».R1 


041050 


012600 










MOV 


(SP)..RO 


10433 041052 


000205 






RTS 


R5 




10434 








.DSABL 


LSB 







CVMjAAO MSVll-J rtCMORY DIAG. 
FIELD SERVICE MODE 

10436 
10437 

10438 041054 



10439 041054 

10440 041056 
041056 

10441 

10442 041062 
041062 
041066 
041070 
041074 
041076 

10443 041076 
041076 



10444 
10445 
10446 

10447 
10448 
10449 

10450 



10451 
10452 

10453 



041102 
041104 
041106 
041106 
041106 
041112 
041114 
041114 
041120 
041120 
041124 
041130 
041132 
041132 
041140 
041140 



10454 041144 

10455 041146 
041146 

10456 041150 

10457 041154 

10458 041156 
041156 



10459 
10460 



10461 
10462 
10463 
10464 
10465 
10466 
10467 



041162 
041164 
041164 
041166 
041170 
041174 
041176 
041200 
041202 
041204 
041206 
041210 



104415 

104401 066116 



005737 
001003 
005737 
001404 



002126 
002426 



104401 067557 

104416 

000207 



005737 
001402 



002544 



013746 177746 



013746 
013746 
104424 

012737 

104401 

104414 

012600 
020027 
101403 

104401 

000766 

010046 
006316 
004737 
041252 
041354 
041464 
041632 
042106 
042426 
043344 



002152 
002006 



177777 
067007 

000022 
066137 

041242 
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.SBTTL FIELD SERVICE MODE 
FIELDSERVICE-.SUBTST <<SUBR FIELD SERVICE COMMAND MODE>> 

; ******************************************************************************* 

;*SUBTEST SUBR FIELD SERVICE COtWAND MODE 

: ******************************************************************************* 

SAVREG 

TYPE MSG020 ; FIELD SERVICE COMMAND MODE 

TYPEIT .MSG020 
.DSABL CRF 



SEQ 09M 



002006 



1*; 



FSl! 



IJ: 



IF RLFLAG IS TRUE OR NOFSMODE IS TRUE 



TYPE MSG048 
TYPEIT .MSG048 
.DSABL CRF 

RESREG 

RETURN 
END iOF IF RLFLAG 



TST 
BEQ 

PUSH 



CACHKN 
CONTRL 



PUSH CSRNO, KAMIKAZE 



CACHOFF 
SET 

TYPE 

TYPEIT 

.DSABL 

RDDEC 

POP 

CMP 

BLOS 

TYPE 

TYPEIT 

.DSABL 

BR 

CASE RO 



KAMIKAZE 

MSG026 

,MSG026 

CRF 

RO 

R0.#18. 
i.i 

MSG021 
.MSG021 
CRF 
FSl 



FSCMOO 
FSCMDl 
FSCMD2 
FSCMD3 
FSCMD4 
FSCMD5 
FSCM06 



sNOT AVAILABLE NOW 



TST RLFLAG 
BNE L404 
TST NOFSMODE 
BEQ L40S 
L404 ::::::: 
TRY LATER! 

L405::;::ii 



{SAVE CACHE STATUS 

:SAVE CSR t KAMIKAZE STATUS 

;TURN CACHE OFF 

{COMMAND: 



:REA0 A DECIMAL NUMBER 
; COMMAND - > RO 



MOV CONTRL. -(SP) 

MOV CSRNO. -(SP) 
MOV KAMIKAZE. -(SP) 



MOV «-l. KAMIKAZE 



MOV (SP)«.RO 



EXIT FIELD SERVICE COMMANDS 

READ CSR 

LOAD CSR 

EXAMINE MEMORY 

MODIFY MEMORY 

SELECT BANK £ PATTERN 

TYPE CONFIGURATION MAP 



MOV RO.-(SP) 
ASL 9SP 
JSR PC,L406 



CVMJAAO MS VII -J MEMORY 01 AG. MACRO VOS.Oib Friday 15 Feb 
SUBR FIELD SERVICE COMMAND MODE 



10468 041212 


043352 


FSCM07 


10469 041214 


043644 


FSCMD8 


10470 041216 


044072 


FSCM09 


10471 041220 


044364 


FCMOlO 


10472 041222 


044412 


FCMOll 


10473 041224 


044434 


FCMD12 


10474 041226 


044454 


FCMD13 


10475 041230 


044476 


FCMD14 


10476 041232 


044514 


FCMD15 


10477 041234 


044600 


FCMD16 


10478 041236 


044642 


FCMD17 


10479 041240 


044656 


FCMD18 


10480 041242 




END ; OF 


041242 




041242 


062616 




041244 


013646 




041246 


004736 




10481 041250 


000733 


BR 



L8 

16:10 Page 337 1 

SEQ 0309 

:SOB-A-LONG TEST 

: ERROR SUMMARY 

; REFRESH TEST 

:SET FILL COUNT 

; ENTER KAMIKAZE MODE 

:EXIT KAMIKAZE MODE 

:TURN CACHE OFF 

jTURN CACHE ON 

:TEST ONLY SELECTED BANKS 

i RESUME TESTING ALL BANKS 

; ENABLE TRACE 

: DISABLE TRACE 

L406::::::: 

ADD (SP)*.aSP 
MOV a(SP)*.-(SP) 

JSR PC.acsp)* 



M8 
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SUeR FIELD SERVICE COMHANO MODE 



SEQ 0310 



10484 041252 



10405 041252 






041252 


104401 


070535 


10486 041256 


062706 


000002 


10487 041262 






041262 


005737 


002010 


041266 


001405 




10488 041270 


062706 


000002 


10489 041274 


005037 


002010 


10490 041300 






041300 


000402 




041302 






10491 041302 






041302 


012637 


002006 


10492 041306 






041306 






10493 041306 






041306 


012637 


002152 


10494 041312 


005737 


002544 


10495 041516 


001414 




10496 041320 






041320 


023737 


002544 


041326 


A/\ a AAV 

001003 




10497 041330 


A^ A^A£ 

062706 


000002 


10498 041334 






Ail a wji 

041334 


000405 










10499 041336 


005737 


002544 


10500 041342 


001402 




10501 041344 






041344 


012637 


177746 


10502 041350 






041350 






10503 041350 


104416 




10504 041352 


000207 




10505 






10506 041354 







10507 041354 

10508 041360 

10509 041364 
041364 

10510 041372 

10511 041374 
041374 

10512 041402 

10513 041404 
041404 
041412 
041420 



004737 
010637 

012737 

104426 

012737 
104026 

012737 
022737 
001002 



FSCMOO: SUBTST <<C0t1MAN0 0 EXIT>> 
; •SUBTEST COMMAND 0 EXIT 

;******************************************************************************* 

TYPE MSG103 j LEAVING FIELD SERVICE MODE 

TYPEIT .MSG103 



.DSABL CRF 
ADD 02. SP 
IF SKIPKAMI IS TRUE 



ADD 
CLR 
ELSE 



»2.SP 
SKIPKAMI 



002550 



POP KAMIKAZE 

END sOF IF SKIPKAMI 

POP CSRNO 

TST CACHKN 

BEQ RESO 

IF CACHKN EQ CACHKF 



ADD 
ELSE 



TST 
BEQ 
POP 



#2.SP 



CACHKN 

RESO 

CONTRL 



END jOF IF CACHKN 



RESO: 
FSCMDl: SUBTST 



RESREG 
RETURN 



<<FS 



COMMAND 1 



TST SKIPKAMI 
BEQ L407 
; THROW AWAY OLD KAMIKAZE FLAG 



BR L410 

L407::::i:: 
:RESTORE OLD KAMIKAZE FLAG 

MOV (SP)*. KAMIKAZE 

L410::i:::: 

MOV (SP)*. CSRNO 



;IF CACHE IS OFF 

CMP CACHKN. CACHKF 
BNE L411 

; THROW AWAY CACHE STATUS 

BR L412 
L411::::::: 

{RESTORE CACHE STATUS 

MOV (SP).. CONTRL 
L412::s:::: 

READ CSR>> 



044670 
002306 

041430 000004 



177777 002430 



{♦SUBTEST FS COMMAND 1 READ CSR 



034114 

000005 



000004 
004010 



CALL 
MOV 
SET4 
MOV 
.DSABL 
READCSR 
SET 

ERROR 

RES4 

MOV 

CMP 

BNE 



UHICHCSR 
SP.FSSTACK 
#RES1 
«RES1,4 
CRF 

NOERROR 
•26 

0TIME0UT.4 

O5.PR0TYP 

101$ 



; TRAPS TO 4 GOTO RESl 



:USE ERROR ROUTINE FOR PRINTOUT 
{RESET TRAPS TO 4 TO DEFAULT 

:IS THIS AN 11/83/84 ? 
{BRANCH IF NOT 



MOV »-l. NOERROR 



CVMJAAO MSVll-J MEMOBY 01 AG. 
COMMAND 1 



REAO CSR 
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OOS037 


1777<>*» 






n ft 


rpl FDD 














101 i • 






:THAT A EXPECTED TRAP COULD HAVE SET 


A V J 




000207 








RFTURN 








041430 

A~ ^/V 










TYPF 




•THIS CSR DQFS NOT FXTST 




041430 

A~ *#t/ 


104401 


066763 

WW ' V «^ 






TYPFT7 
OSABL 


CRF 


10916 


041434 


013706 


002306 






MOV 


FSSTACK SP 




10517 


041440 










RES4 


•RESET TRAPS TO 4 TO DEFAULT 




041440 


012737 


034114 


000004 




MOV 


«TIME0UT,4 




041446 


022737 


000005 


004010 




CMP 


•5.PR0TYP 


:IS THIS AN 11/83/84 ? 




041454 


001002 








BNE 


101$ 


: BRANCH IF NOT 




041456 


005037 


177766 






CLR 


CPUERR 


: CLEAR OUT THE CPU ERROR REGISTER BITS 




041462 








101$: 
























.-THAT A EXPECTED TRAP COULD HAVE SET 














.DSABL 


CRF 


1051S 


041462 


000207 








RETURN 







SEQ 0311 



CVMJAAO MSVll-J MEHORY 
FS COHMAND 1 



01 AG. HACRO VOS.Olb Friday IS 
READ CSR 



B9 

Feb-8S 16:10 Page 341 



SEQ 031. 











FGC^©2: 


SUBTST 


<<FS COMMAND 2 LOAD CSR>> 










•••SUBTEST 


FS COMMAND 2 LOAD CSR 




004737 


044670 






CALL 


UHICHCSR 




AA1470 


010637 

VAVv J > 








HOV 


SP.FSSTACK 




10^P4 041474 










SET4 


•RES2 


STRAPS TO 4 GOTO RES2 


041474 


012737 

VAC > 1^ > 


041576 


000004 




MOV 


«RES2,4 












.DSABL 


CRF 




lO^P^ 041 SOP 


104426 








READCSR 






10526 041504 










TYPE 


MSG027 




041504 


104401 


067021 






TYPEIT 


.MSG027 














.DSABL 


CRF 




10S27 041S10 










SET 


NOERROR 




041510 


012737 


177777 


002430 








MOV NOERROR 


10598 041516 


104026 








ERROR 


*26 


iUSE ERROR ROUTINE FOR PRINTOUT 


105P9 041SPO 










RES4 




: RESET TRAPS TO 4 TO DEFAULT 


O415P0 


012737 


034114 


000004 




MOV 


#TIME0UT.4 


0415P6 


022737 


000005 


004010 




CMP 


#5.PR0TYP 


:IS THIS AN 11/83/84 ? 


041534 


001002 

wx wc 








BNE 


101$ 


i BRANCH IF NOT 


041536 


005037 


177766 






CLR 


CPUERR 


; CLEAR OUT THE CPU ERROR REGISTER BITS 


041542 








101$: 






















5 THAT A EXPECTED TRAP COULD HAVE SET 












.DSABL 


CRF 




10530 041542 










TYPE 


MSG023 


s FIRST CSR UORD 


041542 


104401 


066747 






TYPEIT 


.MSG023 














.DSABL 


CRF 




10531 041546 


104413 








RDOCT 




.•READ AN OCTAL NUMBER 


10532 041550 










rOr 


CSR 


;HUT IN IN LOC "CSR 


041550 


012637 


002 J 50 










MOV (SP;..CSR 


10533 041554 


104425 








LOADCSR 




10534 041556 


104426 








READCSR 






1053b 041560 










TYPE 


MSG028 




041560 


104401 


067036 






TYPEIT 


.MSG028 














.DSABL 


CRF 




10536 041564 










SET 


NOERROR 




041564 


012737 


177777 


002430 








MOV »-l. NOERROR 


10537 041572 


104026 








ERROR 


*26 


:USE FOR PRINTOUT - NOT AN ERROR 


10538 041574 


000207 








RETURN 







10539 041576 
041576 

10540 041602 

10541 041606 
041606 
041614 
041622 
041624 
041630 



104401 

013706 

012737 
022737 
001002 
005037 



066763 
002306 

034114 000004 
000005 004010 

177766 



RES2: 



101$: 



10542 041630 000207 



TYPE 
TYPEIT 
.DSABL 
MOV 
RES4 
MOV 
CMP 
BNE 
CLR 



.DSABL 
RETURN 



MSG02S 
.MSG025 
CRF 

FSSTACK.SP 

#TIME0UT.4 
#5.PR0TYP 
101$ 
CPUERR 



CRF 



iTHIS CSR DOES NOT EXIST 



{RESET TRAPS TO 4 TO DEFAULT 

IS THIS AN 11/83/84 ? 
BRANCH IF NOT 

CLEAR OUT THE CPU ERROR REGISTER BITS 
;THAT A EXPECTED TRAP COULD HAVE SET 



CVMJAAO MSVll-J 
FS COMMAND 
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2 LOAD CSR 
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SEQ 0313 



10545 


041632 






10546 


041632 








041632 


013746 


AA^I A'^ 

002102 




041636 


013746 


002076 




041642 


013746 


002304 




041o46 


013746 


AAAAA^ 
000004 


10547 


041652 


012737 


000002 


10546 


041660 








041660 


104401 


067052 


10549 


041664 








041664 


104401 


067111 


10550 


041670 


104413 




10551 


041672 


013737 


056146 


10552 


041700 








041700 


012600 




10553 


041702 


000241 




10554 041704 


006100 




10555 041706 


006137 


002102 


10556 


041712 


000241 




10557 


041714 


006000 




10556 


041716 


023737 


002102 


10559 


041724 


003357 




10560 


041726 


062700 


060000 


10561 


041732 






10562 


041736 


001352 




10563 


041740 


020027 


157776 


10564 


041744 


101347 




10565 


041746 


012737 


042020 


10566 


041754 








041754 


012737 


042026 


10567 


041762 








041762 


A| ATA£ 






041764 


013703 


002102 




041770 


004737 


035716 




041774 


012603 




10568 


041776 








041776 


053737 


002552 


10569 


042004 


All AAt 




10570 


042006 


104417 




10571 


042010 








042010 


010146 






042012 


104403 






042014 


006 






042015 


000 




10572 042016 


000410 




10573 








10574 


042020 








042020 


104401 


067151 



FSCM03: SUBTST <<FS COMMAND 3 EXAMINE MFMORy>> 

{♦SUBTEST FS COMMAND 3 EXAMINE MEMORY 



002076 



1$: 



002102 



002556 



002304 
000004 



177776 



PUSH 



BANK , NOPAR , PARTHERE . 4 



MOV 


#2. NOPAR 


TYPE 


MSG029 


TYPEIT 


.MSG029 


.DSABL 


CRF 


TYPE 


MSG031 


TYPEIT 


.MSG03] 


.DSABL 


CRF 


RDOCT 




MOV 


«HI OCT. BANK 


POP 


RO 


CLC 




Dm 




ROL 


BANK 


CLC 




ROR 


RO 


CMP 


RANK 1 A<tTRANK 


BGT 


U 


ADD 


ffFIRST.RO 


BIT 


«BITO.RO 


BNE 


1« 


CMP 


RO.tfLAST 


BHI 


1$ 


MOV 


«3*. PARTHERE 


SET4 


«4$ 


MOV 


«4I,4 


.DSABL 


CRF 


MAP 


BAr«< 


MOV 


6ANK.R3 


CALL 


MAPPER 


.DSABL 


CRF 


TESTAREA 


BIS 


TESTMODE.PSU 


.DSABL 


CRF 


MOV 


(RO).Rl 


KERNEL 




TYPOCS 


Rl 


MOV 


R1,-(SP) 


TYPOS 




.BYTE 


6 


.BYTE 


0 


.DSABL 


CRF 


BR 


EXCMD3 


TYPE 


MSG032 


TYPEIT 


.MSG032 



{INDICATE PARITY ACTION 
{EXAMINE MEMORY 



MOV BANK.-(SP) 
MOV NOPAR. -(SP) 
MOV PARTHERE. (SP) 
MOV 4.-(SP) 



{PHYSICAL ADDRESS (0-17775776)?? 



{READ OCTAL NUMBER ONTO STACK (. tHIOCT 
{PUT MSB'S IN BANK 
{PUT LSB'S IN RO 



MOV (SP)».RO 



{CHECK FOR 
{BRANCH IF 

CHECK FOR 
BRANCH IF 
CHECK FOR 
BRANCH IF 
INCASE OF 
TRAPS TO 4 



BANK 
TRUE 



TOO HIGH 



ODD ADDRESS 
ODD ADDRESS 
ADDRESS OVER 
OVER 16K 
ABORTS 
GOTO 4« 



16K 



{MAP SUPERVISOR SPACE 



{ENTER TEST MODE 



(TEST AREA) TO BANK 
MOV R3.-(SP) 



MOV (SP)*.R3 



{GO TO SYSTEM TEST MODE 



{ENTER KERNEL MODE 



SAVE Rl FOR TYPEOUT 
GO TYPE-OCTAL ASCII 
TYPE 6 DIGITS 
SUPPRESS LEADING ZEROS 



{PARITY ABORT 



^tiM lAAA Md<4 4 I 

CVnjAAO nSvll-J 


UP MAO W 


DIAG. 


nACRO 


VOS.Olb Friday 1 


FS COfttlAND 


3 


EXAnlNE 


ntnOftY 










.OSABL 


10575 042024 


AAA M AP 

000405 






BR 


105/6 










10577 042026 


A£ A£ 

062706 


A A AAA A 

000004 




4$: ADO 


10578 042032 








TYPE 


Ail 

042032 


m Ail ii A « 

104401 


Af 'V « ^ A 

067170 




TYPEIT 










.DSABL 


10579 042036 


AAA^ A A 

000400 






BR 


« A^AA 

10500 








«Aff*« Ail^AilA 

10581 042040 


• Ail il « ^ 

104417 






EXCnD3: KERNEL 


4ACA1 Ail ^Ail ^ 

10582 042042 








POP 


Ail ^Aii 

042042 


012637 


A A AAA il 

000004 






Ail ^Ail£ 

042046 


012637 


AA^ Y Ail 

002304 






AA OAC^ 

042052 


A1 'iCTI 


AAOA^£ 

002076 






Ail 9AC£. 

042036 


A1 OtlT 

012637 


AA^i n'y 

002102 






1 ACSV Ail^Af.^ 

10303 042062 








APO « 

RES4 




vie 131 




uyuouH 


nuv 


042070 


022737 


000005 


004010 


CMP 


042076 


001002 






BNE 


042100 


005037 


177766 




CLR 



042104 



10584 042104 000207 



101$: 



.DSABL 
RETURN 



D9 



Page 343-1 



SEQ 0314 



CRF 

EXCMD3 

*4.SP 
MSG033 
.MSG033 
CRF 

EXCMD3 



:FIX STACK 
: TIMEOUT TRAP 



; ENTER KERNEL MODE 
4 . PARTHERE . NOP AR . BANK 



#TIME0UT.4 
#5.PR0TYP 
101$ 
CPUERR 



CRF 



; RESET TRAPS TO 4 TO DEFAULT 



MOV (SP)«.4 
MOV (SP).. PARTHERE 
MOV (SP)».N0PAR 
MOV (SP}*.BANK 



:IS THIS AN 11/83/84 ? 
! BRANCH IF NOT 

! CLEAR OUT THE CPU ERROR REGISTER BITS 
;THAT A EXPECTED TRAP COULD HAVE SET 



E9 



CVMJAAO MSVll-J MEMORY DIAG. 
FS COMMAND 3 EXAMINE 

10587 042106 
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FSCMD4: SUBTST <<FS COMMAND 4 MODIFY MEMORY >> 

{•SUBTEST FS COMMAND 4 MODIFY MEMORY 



SEO 0315 



10588 042106 








PUSH 


BANK , NOPAR , PARTHERE . 4 


042106 


013746 


002102 






MOV BANK -(SP) 


042112 


013746 


002076 






MOV NOPAR -(SP) 


042116 


013746 


002304 






MOV PARTHERE -(SP 


042122 


013746 


000004 






MOV 4.-(SP) 


10589 042126 


012737 


000003 


002076 


MOV 


#3, NOPAR ; INDICATE PARITY ACTION 


10590 042134 








TYPE 


MSG036 {MODIFY MEMORY 


042134 


104401 


067276 




TYPEIT 


. MSG036 










.DSABL 


CRF 


10591 042140 






1$: 


TYPE 


MSG031 {PHYSICAL ADDRESS (0-17775776)?? 


042140 


104401 


067111 




TYPEIT 


.MSG031 










.OSABL 


CRF 


10592 042144 


104413 






ROOCT 


:READ OCTAL NUMBER ONTO STACK & IHIOCT 


10593 042146 


013737 


056146 


002102 


MOV 


$HIOCT,BANK jPUT MSB'S IN BANK 


10594 042154 








POP 


RO :PUT LSB'S IN RO 


042154 


012600 








MOV (SP)..RO 


10595 042156 


000241 






CLC 


10596 042160 


006100 






ROL 


RO 


10597 042162 


006137 


002102 




ROL 


BANK 


10598 042166 


000241 






CLC 




10599 042170 


006000 






ROR 


RO 


10600 042172 








IF BANK 


GT LASTBANK THEN GOTO 1* : CHECK FOR BANK TOO HIGH 


042172 


023737 


002102 


002556 




CMP BANK, LASTBANK 


042200 


003357 








BGT \% 


10601 042202 


062700 


060000 




AOO 


OFIRST.RO 


10602 042206 








IF #BITO SET. IN RO THEN GOTO 14 ; CHECK FOR ODD ADDRESS 


042206 


032700 


000001 






BIT ftBITO.RO 


042212 


001352 








BNE 1* 


10603 042214 








IF RO HI OLAST THEN GOTO 1$ : CHECK FOR ADDRESS OVER 16K 


042214 


020027 


157776 






CMP RO.OLAST 


042220 


101347 








BHI 1$ 


10604 042222 


012737 


042270 


002304 


MOV 


#3*. PARTHERE {INCASE OF ABORTS 


10605 042230 








SET4 


#4$ {TRAPS TO 4 GOTO 4$ 


042230 


012737 


042276 


000004 


MOV 


#4*. 4 










.DSABL 


CRF 


10606 042236 








MAP 


BANK {MAP SUPERVISOR SPACE (TEST AREA) TO BANK 


042236 


010346- 








MOV R3.-(SP) 


042240 


013703 


002102 




MOV 


BANK,R3 


042244 


004737 


035716 




CALL 


MAPPER 










.DSABL 


CRF 


042250 


012603 








MOV (SP)«.R3 


10607 042252 


104511 






INVALIDATE 


10608 042254 








TEST AREA ; ENTER TEST MODE 


042254 


053737 


002552 


177776 


BIS 


TESTMODE.PSW {GO TO SYSTEM TEST MODE 










.DSABL 


CRF 


10609 042262 


011001 






MOV 


(RO).Rl 


10610 








:GETTING HERE MEANS WE GOT LUCKY - NO TRAPS 


10611 042264 


104417 






KERNEL 


{ENTER KERNEL MODE 


10612 042266 


000410 






BR 


5* 


10613 












10614 042270 






3*: 


TYPE 


MSG032 {PARITY ABORT 


042270 


104401 


067151 




TYPEIT 


.MSG032 










.DSABL 


CRF 



F9 



CVMJAAO MSVll-J MEMORY DIAG. MACRO VOS.Olb Friday 15 Feb- 85 16:10 
FS COMMAND 4 MODIFY MEMORY 



10615 042274 


AAA^ T 4 

000431 




nn 

BR 


CXCMD4 


10616 










10617 042276 


A£')^AX 

062706 


000004 4» : 


ADD 


•4,Sr 


10618 042302 






TYPE 


MSG033 




104401 


AX^I ^A 

067170 


TYPEIT 

AP ABl 

. DSABL 


, MSG033 
CRF 


10619 C42306 


AAAJI ^Jl 

000424 




BR 


EXCMD4 


4 A£ '^A 

10620 










10621 042310 




3» : 


TYPE 


MP ATT 

nSG037 


042310 


104401 


067315 


TYPEIT 
.DSABL 


.MSG037 

CHr 


10622 042314 






T iPOCS 




042314 


010146 




MOV 


Rl.-(SP) 




1 f\AAf\T 

1U44U3 




T vonc 
1 THUS 




042320 


VOO 




DVTC 
.DT It 


o 


042321 


AAA 

000 




.□Ilk 

.UbHBL 


A 
0 

LKr 


10623 042322 






TYPE 


MSG039 


042322 


104401 


067352 


TYPEIT 
.DSABL 


,MSG039 
CRF 


10624 042 32o 


1 A^^ 1 T 

104413 




RDOCT 




tA&9C AA3TTA 






POP 


Rl 


A^ OT^A 
042330 


A1 0£A1 

012001 








1002O 042332 






TESTAREA 


042332 


053737 


002552 177776 


BIS 
.DSABL 


TESTMODE.PSU 
CRF 


10627 042340 


A1 A1 1 A 

OlUllU 




MOV 


Rl.(RO) 


lUocO 042342 


All AA 1 

011001 




MOV 


(RO).Rl 


10627 042344 


1 flAA 1 7 
10441 f 




KERNEL 




10630 04234O 






TYPE 


MSG038 


042346 


1U4401 


OO ' 334 


TYPEIT 
.DSABL 


,MSG038 
CRF 


10631 042352 
042352 






TYPOCS 


Rl 


010146 




MOV 


Rl.-(SP) 


042354 


104403 




TYPOS 




042356 


006 




.BYTE 


6 


042357 


000 




.BYTE 


0 






.DSABL 


CRF 



Page 345-1 



sEXIT 

{FIX STACK 
; TIMEOUT TRAP 



SEQ 0316 



:EXIT 

iOLD DATA UAS 



; PRINT IT 
SAVE Rl FOR TYPEOUT 
GO TYPE- -OCTAL ASCII 
TYPE 6 DIGITS 
SUPPRESS LEADING ZEROS 



i INPUT NEU DATA 



(^EAD ON OCTAL NUMBER ONTO THE STACK 
;GET NEU NUMBER 

MOV (SP)».R1 

: ENTER TEST MODE 

:G0 TO SYSTEM TEST MODE 

:PUT IT IN MEMORY 
:READ IT AGAIN 
;ENTFR KERNEL MODE 

:0ATA IS NOU 



J PRINT IT 
SAVE Rl FOR TYPEOUT 
GO TYPE "OCTAL ASCII 
TYPE 6 DIGITS 
SUPPRESS LEADING ZEROS 



10632 



10633 


042360 


104417 






EXCMD4: 


KERNEL 




i ENTER KERNEL MODE 


10634 


042362 










POP 


4 . PARTHERE . NOPAR , BANK 




042362 


012637 


000004 










MOV (SP)*.4 




042366 


012637 


002304 










MOV (SP)*. PARTHERE 




042372 


012637 


002076 










MOV (SP)», NOPAR 




042376 


012637 


002102 










MOV (SP)*.BANK 


10635 


042402 










RES4 




; RESET TRAPS TJ 4 TO DEFAULT 




042402 


012737 


034114 


000004 




MOV 


0TIME0UT.4 






042410 


022737 


000005 


004010 




CMP 


«,PROTYP 


;IS THIS AN 11/83/84 ? 




042416 


001002 








BNE 


101* 


; BRANCH IF NOT 




042420 


005037 


177766 






CLR 


CPUERR 


: CLEAR OUT THE CPU ERROR REGISTER BITS 




042424 








101$: 


.DSABL 


CRF 


;THAT A EXPECTED TRAP COULD HAVE SET 


10636 


042424 


000207 








RETURN 







G9 



CVMJAAO MSVll-J MEMORY OIAG. 
FS COMMAND 4 MODIFY 

10639 042426 



10640 


042426 








042426 


013746 


002102 




042432 


013746 


002112 




042436 


013746 


002412 




042442 


013746 


002326 




042446 


013746 


000060 




042452 


013746 


000062 


10641 


042456 


010637 


002306 


10642 


042462 








042462 


104401 


067374 


10643 


042466 








042466 


104401 


067072 


10644 


042472 


104413 




10645 


042474 








042474 


012637 


002102 


10646 


042500 










yJCJ fit 


AA01 AO 




042506 


003367 




10647 








10648 


042510 


013701 


002102 


10649 


042514 


006301 




10650 


042516 


006301 




10651 


042520 








042520 


033761 


002106 




Ail 9C9£ 

042526 


f\f\ 1 AAV 




10652 


042530 








042530 


104401 


067420 


10653 


042534 








042534 


000754 




10654 


042536 








042536 






10655 








10656 


042536 








042536 


104401 


067445 


10657 042542 


1 f\S AIT 




10658 


042544 








042544 


012637 


002112 


10659 042550 








042550 


023727 


002112 




042556 


003367 




10660 


042560 








042560 


005737 


002112 




042564 


001004 




10661 


042566 








042566 


104401 


067463 


10662 


042572 


104413 




10663 


042574 








042574 


012602 
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FSCM05: SUBTST <<FS COMMAND 5 SELECT BANK £ PATTERN>> 

{♦SUBTEST FS COMMAND 5 SELECT BANK £ PATTERN 

PUSH BANK .PATTERN, TEST ADD. PCBUMP . TKVEC . TKVEC*2 

MOV BANK.-(SP) 
MOV PATTERN. (SP) 
MOV TESTADD.-(SP) 
MOV PCBUW>.-(SP) 
MOV TKVEC. (SP) 
MOV TKVEC*2.-(SP) 

MOV SP.FSSTACK jSAVE LAST GOOD STACK POINTER 

TYPE MSG040 

TYPEIT .MSG040 

.DSABL CRF 
1$: TYPE MSG030 

TYPEIT .MSG030 

.DSABL CRF 

RDOCT :REA0 AN OCTAL NUMBER ONTO THE STACK 

POP BANK :PUT IT IN BANK 

MOV (SP)*.BANK 

IF BANK GT LASTBANK THEN GOTO 1$ ; CHECK FOR BANK TOO HIGH 
002556 CMP BANK, LASTBANK 



SEQ 0317 



002664 



2i: 



000047 



.•SELECT BANK 6 PATTERN TEST 
jBANKC 0-177)? 



MOV BANK.Rl 
ASL Rl 
ASL Rl 

IF CPUBIT OFF. IN CONFIG(Rl) 



TYPE MSG041 
TYPEIT ,MSG041 
.DSABL CRF 

GOTO 1$ 



;BANK NOT ACCESSABLE 



END ;0F IF 



BGT 1$ 



BIT CPUBIT, CONFIG(Rl) 
BNE L413 



BR 1$ 



L413: 



TYPE 
TYPEIT 
.DSABL 
RDOCT 
POP 



MSG042 
,MSG042 

CRF 



PATTERN 

IF PATTERN GT #47 THEN GOTO 2$ 
IF PATTERN EQ *0 



sPATTERN(0-45)? 



:READ AN OCTAL NUMBER ONTO THE STACK 
;PUT IT IN PATTERN 

MOV (SP)«. PATTERN 
5 CHECK FOR PATTERN TO HIGH 

CMP PATTERN. 047 
BGT 2t 



TYPE 
TYPEIT 
.DSABL 

RDOCT 

POP R2 



MSG043 
.MSG043 
CRF 



{PATTERN 0 DATA IS? 



TST PATTERN 
BNE L414 



{READ AN OCTAL NUMBER ONTO THE STACK 
{PUT IT IN R2 

MOV (SP)*.R2 



CVnjAAO MSVll-J 
FS COftlANO 

10664 042576 

042576 

10665 
10666 

10667 042576 
042576 
042600 
042604 

042610 

10668 042612 

10669 042614 

10670 042620 
042620 
042624 

10671 042626 
042626 

10672 042632 

10673 042636 
042636 

10674 042636 
042636 



H9 
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SELECT BANK C PATTERN 



SEQ 0318 



010346 
013703 
004737 

012603 
104511 
004737 

005737 
001404 

104401 
000137 



002102 
035716 



040052 
002124 

067617 
043246 



104401 067505 



10675 
10676 
10677 
10678 
10679 
10680 
10681 
10682 
10683 
10684 
10685 
10686 
10687 
10688 
10689 



042642 
042650 
042654 
042660 
042664 
042670 
042674 
042676 
042702 
042710 
042716 
042722 
042730 



013737 
013702 
072227 
016203 
072327 
042703 
006303 
010337 
012737 
012737 
017700 
042737 
052777 



002152 
002102 
000002 
002664 
177770 
177760 

002152 
043246 
000340 
137722 
000200 
000100 



002154 



000060 
000062 

177776 
137704 



10690 


042736 










042736 


012737 


177777 


002612 




042744 


012737 


177777 


002110 


10691 


042752 


013701 


002102 




10692 


042756 


006301 






10693 


042760 


006301 






10694 


042762 


005037 


002240 




10695 


042766 


005037 


002264 




10696 


042772 


012737 


060000 


002412 


10697 


043000 


012737 


060002 


002414 


10698 


043006 










043006 


032761 


010000 


002666 




043014 


001413 






10699 


043016 


005237 


002240 




10700 


043022 
043022 


010346 








043024 


013703 


002102 






043030 


004737 


035716 





END :0F IF 



L414: 



MAP 



BANK 



MOV BANK.R3 
CALL MAPPER 
.DSABL CRF 

INVALIDATE 
CALL EXBANK 
IF RRFLA6 IS TRUE 



TYPE MSG049 
TYPEIT .MSG049 
.DSABL CRF 

JMP CMD5C 
END :0F IF RRFLA6 



iMAP SUPERVISOR SPACE (TEST AREA) TO BANK 

MOV R3.-(SP) 



MOV (SP)«.R3 



:SET NEW MARGINS 



TST RRFLAG 
BEQ L415 
iBANK REQUIRES RELOCATION 



TYPE 

TYPEIT 

.DSABL 

MOV 

MOV 

ASH 

MOV 

ASH 

BIC 

ASL 

MOV 

MOV 

MOV 

MOV 

BIC 

BIS 



SET 



MSG046 

.MSG046 

CRF 

CSRNO.SAVCSR 

BANK.R2 

*2,R2 

C0NFIG(R2).R3 
#-10. R3 
»tC17.R3 
R3 

R3.CSRN0 

#CMD5C.TKVEC 

#340,TKVEC*2 

9$TKB,R0 

0BIT7.PSU 

«BIT6.9$TKS 



HEADER. MUT 



L415: 



;T0 ESCAPE TYPE ANY KEY! 



SAVE OLD CSR NUMBER 

GENERATE INDEX INTO CONFIGURATION TABLE 

R3 = LOU UORD OF CONFIGURATION TABLE FOR THIS BANK 

POSITION CSR CODE IN BITS 0 3 

CLEAR ALL BUT THE CSR CODE 

ADJUST CSR NUMBER 



CMD5B: 



MOV 
ASL 
ASL 
CLR 
CLR 
MOV 
MOV 

IF #BIT12 SET.IN C0NFIG«2(R1) 



BANK.Rl 
Rl 
Rl 

SPLTCSR 
PASFLG 

#FIRST,TESTADD 
#FIRST*2.TESTADD*2 



KILL ANY OLD INTERRUPT 
LOWER CPU PRIORITY TO 140 
ENABLE KEYBOARD INTERRUPTS 



MOV 
MOV 



#-1. HEADER 
#-l.MUT 



INC 
MAP 

MOV 
CALL 



SPLTCSR 
BANK 

BANK.R3 
MAPPER 



BIT #BIT12.C0NFIG«2(R1) 
BEQ L416 



MOV R3.-(SP) 



CVMJAAO nSVll-J hEMORY DIAG. 



FS 



COmANO 5 
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SELECT BANK 6 PATTERN 



SEO 0319 



10701 
10702 

10703 



10704 
10705 



10706 

10707 
10700 

10709 

10710 
10711 
10712 
10713 
10714 
10715 
10716 
10717 
10718 
10719 
10720 
10721 
10722 
10723 
10724 
10725 
10726 
10727 
10728 
10729 
10730 
10731 
10732 
10733 
10734 
10735 
10736 
10737 
10738 
10739 
10740 
10741 
10742 
10743 
10744 
10745 
10746 
10747 



043034 
043036 
043044 
043044 
043044 
043044 
043052 
043054 
043056 
043056 
043060 
043060 
043060 
043064 
043066 
043066 
043072 
043072 
043072 
043100 
043106 
043112 
043114 
043120 
043124 

043126 
043130 
043132 
043134 
043136 
043140 
043142 
043144 
043146 
043150 
043152 
043154 
043156 
043160 
043162 
043164 
043166 
043170 
043172 
043174 
043176 
043200 
043202 
043204 
043206 
043210 
043212 
043214 
043216 
043220 



012603 

012737 120000 002414 



032777 000001 137564 

001402 

104470 

000405 



013746 002152 
104502 

012637 002152 



012737 000002 002076 

012737 000002 002326 

013700 002112 
006300 

004770 043126 

005037 002076 
000712 

017510 
017544 
017640 
017754 
020070 
020140 
020222 
020256 
020320 
024220 
024220 
024220 
020354 
024220 
024220 
020434 
020456 
020536 
021026 
021060 
021124 
024220 
021332 
021610 
022200 
022454 
022644 
023160 
023346 
023446 



FSPAT: 



.DSABL CRF 

MOV *120000.TESTAOO«2 
END: OF IF WIT 12 

IF «SUO SET. IN aSUR 



ECCDIS 
ELSE 



PUSH CSRNO 

CLRCSR 

POP CSRNO 

END ;0F IF 



MOV 

MOV 

MOV 

ASL 

CALL 

CLR 

BR 

MTOOOO 
MTOOOl 
MT0002 
MT0003 
MT0004 
MT0005 
MT0006 
MT0007 
MTOOlO 
MT0999 
MT0999 
MT0999 
MT0014 
MT0999 
MT0999 
MT0017 
MT0020 
MT0021 
MT0022 
MT0023 
MT0024 
MT0999 
MT0026 
MT0027 
MT0030 
MT0031 
MT0032 
MT0033 
MT0034 
MT0035 



»2.N0PAR 
#2,PCBUMP 
PATTERN. RO 
RO 

aFSPAT(RO) 

NOPAR 

CMD5B 



<1 SEC 
<1 SEC 
<1 SEC 
SEC 
SEC 
SEC 



1 
1 
1 



<1 SEC 
<1 SEC 
<1 SEC 
<1 SEC 
<1 SEC 
<1 SEC 
1 SEC 
<1 SEC 
<1 SEC 
<1 SEC 
1 SEC 
1 SEC 
10 SEC 
10 SEC 
20 SEC 
<1 SEC 
<1 SEC 
1 SEC 
1 SEC 
3 SEC 
<1 SEC 
35 SEC 
1 SEC 
<1 SEC 



MOV (SP)»,R3 



L416: i i : s i : 

BIT ffSUO.SSUR 
BEQ L417 
{DISABLE ERROR CORRECTION 



L417: 



BR L420 



i CLEAR CSRS 



MOV CSRNO. -(SP) 
MOV (SP)*. CSRNO 



L420: 

{PARITY ACTION 
STRAPS ADD 2 TO PC 



sLOOP TILL KEYBOARD INTERRUPT 

DATA PATTERN TEST 

ADDRESS TEST 

COMPLEMENT ADDRESS TEST 

3 XOR 9 WORST CASE NOISE TEST 

ROTATING ZEROS TEST 

ROTATING ONES TEST 

INITIAL DATA TEST 

ADDRESS BIT TEST 

BYTE ADDRESSING TEST 

NULL TEST TO KEEP TABLE ORDER 

NULL TEST TO KEEP TABLE ORDER 

NULL TEST TO KEEP TABLE ORDER 

BASIC DOUBLE BIT ERROR TEST 

NULL TEST TO KEEP TABLE ORDER 

NULL TEST TO KEEP TABLE ORDER 

HOLDING I'S 6 O'S TEST 

SYNDROMES TO CSR ON SBE TEST 

MARCHING O'S £ I'S TEST 

REFRESH £ SHIFTING DIAGONAL TEST 

SHIFTING DIAGONAL TEST 

FAST GALLOPING PATTERN TEST 

NULL TEST TO KEEP TABLE ORDER 

RANDOM DATA TEST 

UNIQUE BANK TEST 

FLUSH OUT DBF'S TEST 

SOB-A-LONG TEST 

URITE RECOVERY TEST 

BRANCH GOBBLE TEST 

SOFT ERROR TEST 

WORST CASE NOISE PARITY TEST 



J9 
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COMMAND 5 



SELECT 



MACRO VOS.Olb Friday 15-Feb-85 16:10 
BANK L PATTERN 



10748 
10749 
10750 
10751 
10752 
10753 
10754 
10755 
10756 
10757 
10758 
10759 
10760 
10761 



10762 
10763 



10764 
10765 



043222 
043224 
043226 
043230 
043232 
043234 
043236 
043240 
043242 
043244 

043246 
043252 
043260 
043260 
043264 
043270 
043274 
043274 
043300 
043304 
043304 
043310 
043314 
043314 
043316 
043322 



043326 

10766 043330 

10767 043334 

10768 043342 



023560 
023622 
024220 
023660 
023740 
023774 
024024 
024104 
024134 
024164 

013706 002306 CMD5C: 
042777 000100 137362 



012637 
012637 
117700 

012637 
012637 

012637 
012637 

010346 
013703 
004737 

012603 
004737 
013737 
000207 



000062 
000060 
137350 

002326 
002412 

002112 
002102 



002102 
035716 



040052 
002154 



MT0036 


1 


SEC 


MT0037 


<1 


SEC 


MT0999 


<1 


SEC 


MT0041 


1 


SEC 


MT0042 


<1 


SEC 


MT0043 


1 


SEC 


MT0044 


5 


SEC 


MT0045 


1 


SEC 


MT0046 


1 


SEC 


MT0047 


<1 


SEC 



002152 



MOV FSSTACK.SP 
BIC «BIT6.anKS 
POP TKVEC«2.TKVEC 



MOVB aUKB.RO 

POP PCBUMP.TESTADD 



POP PATTERN. BANK 



MAP BANK 

MOV BANK,R3 

CALL MAPPER 

.DSABL CRF 

CALL EXBANK 

MOV SAVCSR.C3RN0 

RETURN 
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CORRECTION CODE TEST 

ECC DISABLE TEST 

NULL TEST TO KEEP TABLE ORDER 

ADDRESS TO CSR ON DOUBLE BIT ERROR TEST 

EXTENDED Q-BUS ADDRESS TEST 

URITE BYTE CLEARS SBE TEST 

SHIFTING 1/0' S THROUGH THE CHECK BITS 

SYNDROMES TO CSR ON DBE TEST 

CHECK SINGLE BIT ERROR WITH ECC DISABLED TEST 

NO CSR UPDATE WITH SBE ON DBE TEST 

: RECOVER OLD STACK POINTER 



SEQ 0320 



MOV (SP)..TKVEC»2 
MOV (SP)».TKVEC 
;6ET CHARACTER TO GET RID OF FLAG 

MOV (SP)*.PCBUMP 
MOV (SP)*. TEST ADO 



i REMAP OLD BANK 



MOV (SP)». PATTERN 
MOV {SP)».BANK 

MOV R3.-(SP) 



MOV (SP)»,R3 



.RESTORE CSRNO. 



I<9 
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SEQ 0321 



10770 043344 



10771 043344 

10772 043350 
10773 



004737 
000207 



032722 



FSCM06: SUBTST <<FS COMMAND 6 TYPE CONFIGURATION MAP>> 

; ******************************************************************************* 

{•SUBTEST FS COMMAND 6 TYPE CONFIGURATION MAP 

;********************************************************************t********** 

CALL PCONFIG 
RETURN 



L9 



CVMJAAO MSVll-J MEMORY 
FS COMMAND 6 

10776 043352 



10-,77 043352 
043352 
043356 
043362 
043366 
043372 

10778 043376 

10779 043402 
043402 



10780 
10781 



10782 
10783 



10784 
10785 

10786 



043406 
043406 
043414 
043416 
043420 
043420 
043422 
043422 
043424 
043424 
043424 
043424 



10787 

10788 043430 
043430 



10789 
10790 
10791 
10792 
10793 
10794 
10795 
10796 



10797 
10798 



10799 
10800 



10801 
10802 
10803 

10804 



043434 
043442 
043450 
043454 
043462 



043470 
043470 
043476 

043504 
043504 
043510 
043510 
043514 
043514 
043520 
043522 
043526 
043530 
043532 
043536 
043536 
043536 



013746 
013746 
013746 
013746 
013746 
010637 
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TYPE CONFIGURATION MAP 

FSCM07: SUBTST <<FS COMMAND 7 SOB-A-LONG TEST>> 

i ******************************************************************************* 

; ♦SUBTEST FS COMMAND 7 SOB-A-LONG TEST 

•,**********************************************************************t******** 

PUSH BANK , PATTERN , TKVEC , TKVEC ^2 . NOPAR 

MOV BANK.-(SP) 



SEQ 0322 



002102 
002112 
000060 
000062 
002076 
002306 



104401 067671 



032777 
001402 
104470 

000401 

104502 



104401 067712 



104401 067505 



000001 137222 



012737 
012737 
017700 
042737 
052777 



012737 
012737 



005037 

004737 

005737 
001406 
005737 
001003 
104511 
004737 



043560 
000340 
137170 
000200 
000100 



000060 
000062 

177776 
137152 



177777 002612 
177777 002110 



002102 
040052 
002116 
002124 

022454 



MOV 
TYPE 
TYPEIT 
.DSABL 



SP.FSSTACK 
MS6055 
.MSG055 
CRF 



IF «SUO SET. IN SSUR 



ECCDIS 
ELSE 



CLRCSR 
END iOF IF 



TYPE 

TYPEIT 

.DSABL 

TYPE 

TYPEIT 

.DSABL 

MOV 

MOV 

MOV 

BIC 

BIS 



SET 



MSG056 

,MSG056 

CRF 

MSG046 

,MS6046 

CRF 

#CMD7C . TKVEC 

0340.TKVEC*2 

a*TKB.R0 

*BIT7.PSU 

*BIT6.S*TKS 



HEADER, MUT 



MOV PATTERN. -(SP) 
MOV TKVEC. -(SP) 
MOV TKVEC«2.-(SP) 
MOV NOPAR,. (SP) 
sSAVE LAST GOOD STACK POINTER 
;S0B-A-L0NG TEST 



BIT «SU0,9SUR 
BEQ L421 
: DISABLE ERROR CORRECTION 

BR L422 
L421::;;:i: 

: CLEAR CSRS 

L422::;s:ss 
sBELL = EACH PASS COMPLETE 



;T0 ESCAPE TYPE ANY KEY! 



KILL ANY OLD INTERRUPT 
LOWER CPU PRIORITY TO 140 
ENABLE KEYBOARD INTERRUPTS 



MOV #-1. HEADER 
MOV 0-1, MUT 



CMD7B: FOR BANK 



«0 TO LASTBANK 



CALL EXBANK 

IF ACFLAG IS TRUE AND RRFLAG IS FALSE 



INVALIDATE 
CALL MT0031 
END ;0F IF ACFLAG 



B71; 



CLR BANK 



TST ACFLAG 
BEQ L423 
TST RRFLAG 
BNE L423 



END iOF FOR BANK 



L423: i s : ; : s 



M9 
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5 COfWIAND 


7 


SOB-A-LONG TEST 


043536 


005237 


002102 




INC BANK 


Ail ii ^ 

043542 


025737 


002102 


002556 


CMP BANK.LASTBANK 


043550 


003757 






BLE B71 


043552 








E71: 


10005 043552 






TYPE 


?DcLL ;RINb DcLL 


043552 


4 Ail AA4 

104401 


002653 


TYPEIT 


* Of 1 1 

. ?DcLL 








.DSABL 


CHr 


lOOOe 0435Se 






GOTO 


CHUTB 


043556 


000752 






dK CnD7B 


10807 










10000 043560 


013706 


002306 


CMD7C: MOV 


rSSTACK,SP ;RcCUVtR OLD STACK PuINTcR 


1 AAAA AAVK^A 

10009 043564 


04<: f f / 


000100 


137050 BIC 


vol 1 Di vfTKb 


1A04A A^VC^O 

10010 043572 


4 4 77AA 
11 ' '00 


137046 


MOVB 


vfiKDfRO ;RlAU LHMR IU KILL rLAb 


1 AO 4 4 f\A^KTC 
10011 0435 






POP 


NOrAR, TKVcC^e. TKVcL t RAT iLRNt BANK 


U43 J fO 


A 4 O^T7 

01^63/ 


002076 




HUV V.br j*,NUPAR 


AA YiLAO 


Ul<:63 ' 


000062 




nUV I brj* , IKVtL*tf 


AATiLA^ 

U400U0 


A4 ^£17 

Ul(:63 / 


000060 




nUV ^ br J ♦ , 1 K VCL 


AA Y£ 1 0 

043elc 


Ulc63 / 


002112 




MHV/ f CD ^ . DATTCDkl 

nuV V. br J ♦ , KA i 1 tKN 


Ail V£ 4 £ 

043616 


A 4 ^C^7 

012637 


002102 




nOV tSPj*,BANK 


4Aft4^ A^1£^^ 

10012 043622 






MAP 


DAkll/ MAD CI iDPDllTCnD CDAPP ^TCCT AnCA^ TA OA^u/ 

BANK J MAP SUPERVISOR SPACE ITtST AREA J TO BANK 


Ail 

043622 


A4 A1>l£ 

010346 






MAI/ f CQ ^ 

MQV R3 • - 1 SP J 


043624 


A 1 TTAT 

013 /03 


002102 


MOV 


QAUl/ D'X 
QnrilV , K J 


Ail A 

04 36 30 


004 /3 / 


035716 


CALL 


MADDCD 

riHrrtK 








.DSABL 


CRF 


043634 


012603 






MOV (SP'>»,R3 


10813 043636 


004737 


040052 


CALL 


EXBANK 


10814 043642 


000207 




RETURN 





N9 
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FS COMMAND 7 SOB-A-LONG TEST SEQ 0324 



10817 043644 








FSCM08: SUBTST 


<<FS COftlAhC 8 ERROR SUMMARY >> 
























: ^SUBTEST 


FS COMMAt«tf} 8 ERROR SUMMARY 


















10818 043644 








PUSH 


R0.R2.R3.BANK 




043644 


010046 










MOV RO -(SP) 


043646 


010246 










WV R2 . - ( SP ) 


043650 


010346 










MOV R3 -(SP) 


043652 


013746 


002102 








MOV BANK.-(SP) 


10819 043656 


013737 


056654 


002434 


MOV 


♦PASS. TEMP 


10820 043664 


005337 


002434 




DEC 


TEMP 




10821 043670 








TYPDEC 


TEMP 




043670 


013746 


002434 




MOV 


TEMP.-(SP) jjSAVE TEMP FOR TYPEOUT 




043674 


104405 






TYPDS 


i ;G0 TYPE- -DECIMAL ASCII UITH 


SIGN 










. OSABL 


CRF 




10822 043676 


013737 


172350 


002270 


MOV 


KIPAR4,SAV4 ; ; :I.L.C. :REV B 




10823 043704 


012737 


001000 


172350 


MOV 


#1000,KIPAR4 i i ;I.L.C. sREV B 




10824 043712 








TYPE 


MSG125 {PASSES COMPLETED 




043712 


104401 


071242 




TYPEIT 


.MSG125 












.DSABL 


CRF 




10825 043716 








TYPDEC 


♦ERTTL 




043716 


013746 


002630 




MOV 


♦ERTTL.-(SP) ;jSAVE ♦ERTTL FOR TYPEOUT 




043722 


104405 






TYPOS 


::G0 TYPE--DECIMAL ASCII UITH 


SIGN 










.OSABL 


CRF 




10826 043724 








TYPE 


MSG079 :ERROR(S) DETECTED 




043724 


104401 


070265 




TYPEIT 


.MSG079 












.OSABL 


CRF 




10827 043730 








IF JERTTL NE *0 




043730 


005737 


002630 








TST ♦ERTTL 


043734 


001445 










BEQ L424 


10828 043736 


005037 


002334 




CLR 


SUCCESS 




10829 043742 








FOR BANK :> «0 TO LASTBANK 




043742 


005037 


002102 








CLR BANK 


043746 










B72:: 




10830 043746 


013703 


002102 




MOV BANK.R3 




10831 043752 


070327 


000004 




MUL 


#4 R3 




10832 043756 








IFB 


CONFIG *2(R3) NE «0 




043756 


105763 


002666 








TSTB C0NFIG*2(R3) 


043762 


001424 










BEQ L425 


10833 043764 








IF SUCCESS IS FALSE 




043764 


005737 


002334 








TST SUCCESS 


043770 


001005 










BNE L426 


10834 043772 










TYPE MSG076 iBANK ERRORS 




043772 


104401 


070230 




TYPEIT 


,MSG076 










.DSABL 


CRF 




10835 043776 










SET SUCCESS 




043776 


012737 


177777 


002334 






MOV 0-1, SUCCESS 


10836 044004 








END iOF IF SUCCESS 




044004 










L426: 




10837 044004 








TYPOCS BANK, 3 




044004 


013746 


002102 




MOV 


BANK.-(SP) ;;SAVE BANK FOR TYPEOUT 




044010 


104403 






TYPOS 


:;3 

;;G0 TYPE- -OCTAL ASCII 




044012 


006 






.BYTE 


6 ;;TYPE 6 DIGITS 




044013 


000 






.BYTE 


0 :: SUPPRESS LEADING ZEROS 












.DSABL 


CRF 




10838 044014 


116300 


002666 




MOVB C0NFIG*2(R3).R0 
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10839 044020 

10840 044024 
044024 
044026 

10841 044030 
044030 

10842 044034 
044034 

10643 044034 
044034 
044040 
044046 
044050 

10S44 044050 
044050 

10845 044050 

10846 044056 
044056 
044062 
044064 
044066 

10847 044070 



ERROR sunriAR" 

042700 177400 



010046 
104405 



104401 002660 



BIO 

MACRO V05.01b Friday lS-Feb-8S 16:10 Page 352-1 



005237 
023737 
003737 



013737 

012637 
012603 
012602 
012600 
000207 



002102 
002102 



002270 
002102 



002556 



172350 



SEQ 0325 



BIC 
TYPOEC 
RO.-(SP) 



#tC377.R0 
RO 



MOV 
TYPOS 

.DSA8L CRF 

TVPE $CRLF 
TYPEIT . $CRLF 
.DSABL CRF 

END 5 OF IFB C0NFIG(R3) 

END iOF FOR BANK 



END ;0F IF JERTTL 



:sSAVE RO FOR TYPEOUT 
!;G0 TYPE- -DECIMAL ASCII WITH SIGN 



MOV 
POP 



RETURN 



SAV4,KIPAR4 
BANK,R3.R2,R0 



:I.L.C.::iREV B 



L425: :::::: 

INC BANK 

CMP BANK.LASTBANK 
BLE B72 
E72: ::::::: 

L424: 



MOV (SP)».BANK 
MOV (SP)».R3 
MOV (SP)».R2 
MOV (SP)*.RO 



CIO 



CVMJAAO MSVll-J dEnORY 01 AG. MACRO VOS.Glb Friday 15-Feb-85 16:10 Page 354 
FS COmANO 8 ERROR SUTtlARY 



SEQ 0326 



10850 


044072 






10851 


044072 








044072 


013746 


002102 




044076 


013746 


002112 




044102 


013746 


000060 




044106 


013746 


000062 




044112 


013746 


002076 


10852 


044116 


010637 


002306 


10853 


044122 








044122 


104401 


070160 



FSCf109: SUBTST <<FS COMMANO 9 REFRESH TEST>> 

;*SUBTEST FS COMMAND 9 REFRESH TEST 



10854 
10855 



10856 
10857 



10858 
10859 

10860 



10861 



PUSH 



MOV 
TYPE 
TYPEIT 
.OSABL 



BANK , PAT TERN . TKVEC , TK VEC ♦ 2 , NOP AR 

MOV BANK,-(SP) 
MOV PATTERN. -(SP) 
MOV IKVEC. (SP) 
MOV TKVEC«2.-(SP) 
MOV N0PAR,-(SP) 
{SAVE LAST GOOD STACK POINTER 
i REFRESH TEST 



SP.FSSTACK 
MSG073 
.MSG073 
CRF 



044126 
044126 
044134 
044136 
044140 
044140 
044142 
044142 
044144 
044144 
044144 
044144 



032777 
001402 
104470 

000401 

104502 



104401 067712 



000001 136502 



IF «SUO SET. IN aSUR 



ECCOIS 
ELSE 



CLRCSR 
END 8 OF IF 



TYPE 

TYPEIT 

.DSABL 



MSG056 

.MSG056 

CRF 



BIT 0SU0.9SUR 
BEQ L427 
! DISABLE ERROR CORRECTION 

BR L430 
L427::;:i:: 

: CLEAR CSRS 

L430: ; ; ; ; ; ; 
sBELL ' EACH PASS COMPLETE 



10862 


044150 








TYPE MSG046 


sTO ESCAPE TYPE ANY KEY 


1 






044150 


104401 


067505 




TYPEIT .MSG046 


















.DSABL CRF 








10863 


044154 


012737 


044300 


000060 


MOV *CMD9C. TKVEC 








10864 


044162 


012737 


000340 


000062 


MOV ' 340, TKVEC* 2 








10865 


044170 


017700 


136450 




MOV JTKB.RO 


sKILL ANY OLD INTERRUPT 






10866 


044174 


042737 


000200 


177776 


BIC iiIT7,PSU 


;LOUER CPU PRIORITY TO 


140 




10867 


044202 


052777 


000100 


136432 


BIS »bIT6.arKS 


: ENABLE KEYBOARD INTERRUPTS 




10868 
10869 


044210 








SET HEADER. MUT 










044210 


012737 


177777 


002612 






MOV 


#-1. HEADER 




044216 


012737 


177777 


002110 






MOV 


#-l.MUT 


10870 


















10871 


044224 






CMD9B: 


FOR BANK :> 00 TO LASTBANK 










044224 


005037 


002102 








CLR 


BANK 




044230 










B73- ; ; ; 






10872 


044230 


004737 


040052 




CALL EXBANK 








10873 


044234 








IF ACFLAG IS TRUE AND RRFLAG 


IS FALSE 








044234 


005737 


002116 








TST 


ACFLAG 




044240 


001406 










BEQ 


L431 




044242 


005737 


002124 








TST 


RRFLAG 




044246 


001003 










BNE 


L431 


10874 


044250 


104511 






INVALIDATE 








10875 


044252 


004737 


021026 




CALL MT0022 








10876 044256 








END jOF IF ACFLAG 










044256 
















10877 


044256 








END .-OF FOR BANK 










044256 


005237 


002102 






INC 


BANK 



DIO 
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COMMAND 


9 


REFRESH 


TEST 




044262 


023737 


002102 


002556 


CMP RANK 1 AQTRAMf 




044270 


003757 






BLE B73 




044272 










10878 


044272 






TYPE 


$BELL :RING BELL 




044272 


104401 


002653 


TYPEIT 


. ♦BELL 










.OSABL 


CRF 


10879 


044276 






GOTO 


CM09B 




044276 


000752 






BR CMD9fi 


10880 












10881 


044300 


013706 


002306 


CMD9C • MOV 


FSSTACK.SP ; RECOVER OLD STACK POINTER 


10882 


044304 


042777 


000100 


136330 BIC 


#BIT6.a*TKS 


10883 


044312 


117700 


136326 


MOVB 


S$TKB,RO iREAD CHAR TO KILL FLAG 


10884 


044316 






POP 


NOP AR , TKVEC +2 , TKVEC , PATTERN , BANK 




044316 


012637 


002076 




MOV (SP)*.NOPAR 




044322 


012637 


000062 




MOV (SP)* .TKVEC»2 




044326 


012637 


000060 




MOV (SP)*. TKVEC 




044332 


012637 


002112 




MOV (SP)* .PATTERN 




044336 


012637 


002102 




MOV (SP)*,BANK 


10885 


044342 






MAP 


BANK :MAP SUPERVISOR SPACE (TEST AREA) TO BANK 




044342 


010346 






MOV R3.-(SP) 




044344 


013703 


002102 


MOV 


BANK.R3 




044350 


004737 


035716 


CALL 


MAPPER 










.DSABL 


CRF 




044354 


012603 






MOV (SP)«.R3 


10886 


044356 


004737 


040052 


CALL 


EX6ANK 


10887 


044362 


000207 




RETURN 





10888 



ElO 



CVMJAAO MSVll-J MEMORY 
FS COMMAND 9 

10891 044364 



10892 044364 
044364 

10893 044366 
044366 



10894 
10895 

10896 
10897 
10898 

10899 
10900 
10901 



044372 
044374 
044374 
044376 
044402 
044406 
044406 
044410 

044412 



10902 044412 
044412 

10903 044416 
044416 
044424 

10904 044432 
10905 

10906 044434 



10907 044434 
044434 

10908 044440 

10909 044444 
044444 

10910 044452 
10911 

10912 044454 



10913 044454 
044454 

10914 044460 

10915 044462 

10916 044470 

10917 044474 
10918 

10919 044476 



010046 

104401 

104413 

012600 
042700 
110037 

012600 
000207 



OIAG. MACRO VOS.Olb Friday 15-Feb-85 16:10 Page 356 
REFRESH TEST 

FCMDIO: SUBTST <<FS COMMAt© 10 SET FILL COUNT >> 

: ♦SUBTEST FS COMMAND 10 SET FILL COUNT 

PUSH RO 



SEQ 0328 



070311 



177760 
002357 



104401 070456 



012737 
012737 
000207 



177777 002006 
177777 002010 



104401 

005037 

012737 
000207 



070506 
002006 

177777 002010 



104401 070634 



104424 

013737 
005037 
000207 



002544 002546 
002544 



TYPE 

TYPEIT 

.DSABL 

ROOCT 

POP 

BIC 

MOVB 

POP 

RETURN 



MSG085 

.MSG085 

CRF 

RO 

#tC17.R0 

R0.*FILLS 

RO 



;FILL COUNT(OCTAL)? 



MOV RO.-(SP) 

MOV (SP)«,RO 
MOV (SP}*,RO 



FCMDll: SUBTST <<FS COMMAND 11 ENTER KAMIKAZE MODE>> 

; ******************************************************************************* 

;*SUBTEST FS COMMAND 11 ENTER KAMIKAZE MODE 

I******************************************************************************* 

TYPE MSGlOl {ENTERING KAMIKAZE MODE 

TYPEIT .MSGlOl 
.DSABL CRF 

SET KAMIKAZE, SKIPKAMI 

MOV *-l. KAMIKAZE 
MOV *-l. SKIPKAMI 

RETURN 

FCM012: SUBTST <<FS COMMAND 12 EXIT KAMIKAZE MODE>> 

i******************************************************************************* 

{♦SUBTEST FS COMMAND 12 EXIT KAMIKAZE MODE 

■******************************************************************************^ 

TYPE MSG102 {LEAVING KAMIKAZE MODE 

TYPEIT .MSG102 

.DSABL CRF 

CLR KAMIKAZE 

SET SKIPKAMI 

MOV *-l. SKIPKAMI 

RETURN 

FCM013: SUBTST <<FS COMMAND 13 TURN CACHE 0FF>> 

• ******************************************************************************* 

{♦SUBTEST FS COMMAND 13 TURN CACHE OFF 

• ******************************************************************************* 



TYPE MSG106 

TYPEIT .MSG106 

.DSABL CRF 
CACHOFF 

MOV CACHKN.CACHKN«2 

CLR CACHKN 
RETURN 



FCMD14: SUBTST <<FS 



COMMAND 14 



{CACHE IS OFF 



TURN CACHE OFF 

SAVE OLD CACHE ON STATE 

KEEP CACHE OFF 



TURN CACHE 0N>> 



; ******************************************************************************* 

{♦SUBTEST FS COMMAND 14 TURN CACHE ON 



FIO 



CVnjAAO MSVll-J nenORY OIAG. macro VOS.Olb Fnday 15-Feb dS 16:10 Page 356-1 
FS COMHANO 14 TURN CACHE ON 



SEQ 0329 



10920 044476 
044476 

10921 044502 

10922 044510 

10923 044512 
10924 



104401 070652 



013737 
104423 

000207 



002546 002544 



TYPE HSG107 jCACHE IS ON (EXCEPT DURING ACTUAL PATTERNS) 

TYPEIT .MSG107 

.OSABL CRF 

nOV CACHKN*2.CACHKN .-RESTORE OLD CACHE ON STATE 

CACHON sTURN CACHE ON 

RETURN 



CVMJAAO MSVll-J MEMORY 
FS COMMAND 14 

10937 

10930 044514 



DIAG. MACRO 
TURN CACHE ON 



1093O 044514 
044514 

10940 044520 

10941 044524 
044524 

10942 044524 
044524 

10943 044524 
044524 



10944 
10945 

10946 



10947 

10946 

10949 
10950 
10951 
10952 

10953 
10954 



044530 
044532 
044532 
044534 
044534 
044540 
044542 
044544 
044546 
044546 
044546 
044550 
044550 
044550 
044552 
044554 
044562 
044562 
044564 
044564 
044564 
044564 
044564 



10955 044570 
044570 

10956 044576 
10957 

10956 044600 



10959 044600 
044600 

10960 044604 
10961 
10962 

10963 044610 

10964 044614 

10965 044616 



104401 
004737 



104401 

104413 

012601 

020127 
003002 
005701 
002001 

000406 



006301 
006301 
052761 

000760 



070561 
044610 



067072 



000177 



040000 002666 



104401 070727 

012737 177777 002002 
000207 



104401 
005037 



013702 
006302 
006302 



070773 
002002 

002556 



GIO 
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SEQ 0330 

fcm015: subtst <<fs command 15 test only selected banks>> 

s ♦subtest fs command 15 test only selected banks 

type msg105 ; enter banks in octal - use number outside range to terminat 

typeit .msg105 
dsabl crf 

call cmd16a ; erase old selections 

begin cmd16l00p 

B74:::;::: 

REPEAT 

B75: 

TYPE MSG030 iBANK(0-177)? 

TYPEIT .MSG030 
•DSABL CRF 

RDOCT jREAD AN OCTAL NUMBER ONTO THE STACK 

POP Rl iPJT IT IN Rl 

MOV (SP)«.R1 

IF Rl GT #177 OR Rl LT #0 

CMP Rl,#177 
BGT L432 
TST Rl 
BGE L433 
L432: :::::: 

LEAVE CMD16L00P 

BR E74 

END ;0F IF Rl 

L433:;;!!;: 

ASL Rl 

ASL Rl sRl <- Rl * 4 

BIS »BIT14.C0NFIG*2(R1) 
END sOF REPEAT 

BR B75 
E75::ri!!! 

END CMD16L00P 

E74 

TYPE MSGllO ;0NLY SELECTED BANKS* WILL* BE TESTED 

TYPEIT .MSGllO 
.DSABL CRF 
SET SEl ONLY 

MOV #-l.SELONLY 

RETURN 

FCMD16: SUBTST <<FS COMMAND 16 RESUME TESTING ALL BANKS>> 

; ******************************************************************************* 

; ♦SUBTEST FS COMMAND 16 RESUME TESTING ALL BANKS 

; ******************************************************************************* 

TYPE MSGlll jALL BANKS WILL BE TESTED 

TYPEIT .MSGlll 

. DSABL CRF 

CLR SELONLY 

s ENTRY POINT FROM CMD15 

CMD16A: MOV LASTBANK,R2 

ASL R2 

ASL R2 



HIO 
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FS COMMAND 16 RESUME TESTING ALL BANKS 



10966 044620 
044620 005001 
044622 

10967 044622 042761 040000 002666 

10968 044630 

044630 062701 000004 
044634 020102 
044636 003771 
044640 

10969 044640 000207 



FOR Rl M TO R2 BY «4 



BIC *BIT14.C0NFIG»2(R1) 
END :0F FOR Rl 



RETURN 



CLR Rl 
B76: i i i ; t i 



E76: 



ADO 04. Rl 
CMP R1.R2 
BLE B76 



SEQ 0331 



110 
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FS COMMAND 16 RESUME TESTING ALL BANKS SEQ 0332 

10972 044642 FCM017: SUBTST <<FS COMMAND 17 ENABLE TRACE>> 

{♦SUBTEST FS COMMAND 17 ENABLE TRACE 

10973 044642 TYPE MSG127 
044642 104401 071331 TYPEIT ,MSG127 

DSABL CRF 

10974 044646 012737 177777 006216 liov #-1. TRACE 

10975 044654 000207 RETURN 



JIO 
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FS COMMAND 17 ENABLE TRACE 



SEQ 0333 



10978 044656 



10979 044656 
044656 

10980 044662 

10981 044666 



104401 

005037 
000207 



FCn018: SUBTST <<FS COMMAND 18 DISABLE TRACE >> 

i*SllBTEST FS COMMAND 18 DISABLE TRACE 



071350 
006216 



TYPE 
TYPEIT 
.DSABL 
CLR 

RETURN 



MSG128 
.MSG128 
CRF 
TRACE 



CVMJAAO MSVll-J f«MORY DIAG. MACRO VOS.Olb Friday 15-Feb-85 16 
FS COriHANO 18 DISABLE TRACE 



KIO 

:10 Page 363 



SEQ 033« 



10904 044670 






UHICHCSR.-SUBTST 


<<SUBR DETERMINE CORRECT CSR>> 
















:*SUBTEST 


SUBR DETERMINE CORRECT CSR 








******************************************************************************** 


10985 044670 


013700 


002224 




MOV 


TOTCSP'=.RO 


:GET CSR'S FLAG 


10986 044674 


022700 


100000 




CMP 


*BIT15.R0 


:CSR 0? 


10987 044700 


001003 






BNE 


1$ 


sNO - SKIP 


10988 044702 


005037 


002152 




CLR 


CSRNO 


;YES - SET IT UP 


10989 044706 


000207 






RETURN 






10990 














10991 044710 






1$. 


TYPE 


MSG022 


s WHICH CSR(O-F) 


044710 


104401 


066725 




TYPEIT 


,MSG022 










.DSABL 


CRF 




10992 044714 


104412 






RDLIN 




;GET CHARACTER 


10993 044716 








POP 


RO 


;PUT IN RO 


044716 


012600 










MOV (SP)*.RO 


10994 044720 


011000 






MOV 


(RO).RO 


iPUT CHAR IN RO 


10995 044722 


020027 


000106 




CMP 


R0,«106 


; CHECK LIMIT 


10996 044726 


101370 






BHI 


1$ 


:IF BAD LOOP TILL HE TYPES IT RIGHT 


10997 044730 


022700 


000101 




CMP 


«' A.RO 




10998 044734 


103002 






BHIS 


2i 




10999 044736 


162700 


000007 




SUB 


07. RO 




11000 044742 


162700 


000060 




SUB 


«60,R0 




11001 044746 


006300 






ASL 


RO 




11002 044750 


010037 


002152 




MOV 


RO. CSRNO 




11003 044754 


000207 






RETURN 







LIO 



CVMJAAO MSVll-J MEMORY 
ERROR DATA (SUPERVISOR 
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) SETUP STUFF 



11469 

11470 044756 
044756 
044762 

11471 044770 
044770 
044774 

11472 044776 
044776 



11473 

11474 
11475 

11476 



11477 
11478 

11479 

11480 

11481 
11482 
11483 



045004 
045004 
045012 
045014 
045014 
045014 
045014 
045020 
045022 
045022 
045026 
045026 
045030 
045030 
045030 
045034 
045034 
045034 

045040 



010137 
162737 

005737 
001007 

053737 



016137 
104417 



005737 
001003 

010237 

000402 

010337 

000137 



002034 
000002 

002144 

002552 
177776 

177654 
002044 

002044 

050212 



.SBTTL ERROR DATA (SUPERVISOR) SETUP STUFF 
♦PER25: LET ADDRESS := Rl - #2 



002034 

177776 
002052 



IF ABORTFLAG IS FALSE 

TESTAREA 
BIS TESTMGOE.PSU 
.DSABL CRF 

LET BAD := -2(Rl) 

KERNEL 
END ;0F IF ABORTFLAG 

IF 177654 EQ #0 

LET GOOD :> R2 
ELSE 

LET GOOD := R3 
END sOF IF 
JMP PERRAU 



s ENTER TEST MODE 



MOV Rl. ADDRESS 
SUB «2. ADDRESS 

TST ABORTFLAG 
BNE L434 



: ENTER KERNEL MODE 



;G0 TO SYSTEM TEST MODE 

MOV -2(R1).BAD 



L434: 



L435: 



L436: 



TST 177654 
BNE L435 

MOV R2.G00D 

BR L436 

MOV R3.G00D 



11484 


045040 










045040 


005737 


002022 






045044 


001002 








045046 


004737 


034152 






045052 








11485 


045052 










045052 


010046 






11486 


045054 


005037 


002150 




11487 


045060 


104505 






11488 


045062 










045062 


053737 


002552 


177776 


11489 


045070 


005711 






11490 


045072 


104417 






11491 


045074 


104426 






11492 


045076 


013700 


002150 




11493 


045102 


104503 






11494 


045104 


072027 


177773 




11495 


045110 


042700 


177600 




11496 


045114 










045114 


010137 


002034 




11497 


045120 


005037 


002044 




11498 


045124 










045124 


053737 


002552 


177776 



PERRA3: SUBTST <<0ATA WAS 3 U0RDS>> 
;*SUBTEST DATA WAS 3 UORDS 

IF BADPC EQ «0 THEN «CALL BADSTACK 

TST BADPC 
BNE L437 
JSR PC. BADSTACK 
L437:si:;:: 



PUSH 



RO 
CSR 



SEQ 0335 



CLR 

CHKIOIS 
TESTAREA 

BIS TESTMODE.PSU 

.DSABL CRF 

TST (Rl) 

KERNEL 

READCSR 

MOV CSR.RO 
CLRICSR 

ASH #-5.R0 
BIC #tC177.R0 
LET ADDRESS := Rl 

CLR GOOD 
TESTAREA 

BIS TESTMODE.PSU 



MOV RO.-(SP) 
{MAKE SURE CSR BIT HOLDER IS CLEAR 
.•DISABLE ECC £ WRITE CHECKBITS FROM 1 SELECTED CSR 

iGO TO SYSTEM TEST MODE 

iREAD LOCATION TO READ CHECKBITS INTO CSR 

5 GET CSR CONTENTS 

:SAVE CSR CONTENTS IN RO 

{RETURN CSR TO NORMAL MODE 

;MOVE CHECK BITS TO BOTTOM OF WORD 

{CLEAR OFF EXTRANEOUS GARBAGE 

{SAVE VIRTUAL ADDRESS FOR PRINTOUT 

MOV Rl. ADDRESS 

{FIRST TEST WORD WRITTEN SHOULD ALWAYS BE ZERO 
{ENTER TEST MODE 

{GO TO SYSTEM TEST MODE 



CVnjAAO NSVll-J MEHCWY 01 AG. 
DATA UAS 3 WORDS 



MiO 
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SEQ 0336 



11499 045132 


011137 


002052 


11500 


045136 


011437 


002054 


11501 


045142 


104417 




11502 


045144 


110037 


002056 


11503 


045150 


105037 


002057 


11504 


045154 


004737 


050446 


11505 


045160 


104033 




11506 


045162 
045162 


012600 




11507 


045164 








045164 


032777 


000001 




045172 


001402 




11508 


045174 


104506 




11509 045176 








045176 


000401 






045200 






11510 


045200 


104472 




11511 


045202 
045202 






11512 


045202 


000002 





.OSABL 

MOV 

MOV 

KERNEL 

MOVB 

CLRB 

CALL 

ERROR 

POP 



CRF 

(RD.BAD 
(R4),BA02 

R0.BAD3 
BA03*1 
PER6NK 
♦ 33 
RO 



135444 



IF »SUO SET. IN 9SUR 



ENASBE 
ELSE 



ECCINIT 
ENOi OF IF »SUO 

RTI 



GET BAD DATA FROM MUT - FIRST UORD 

AND SECOND UORD 

ENTER KERNEL MODE 

MOVE BAD CHECK8ITS FOR PRINTOUT 

CLEAR OFF THE OTHER UNUSED BITS 

MARK BANK AS BAD IN CONFIG TABLE 



: RESTORE RO 



J TRAP ON SINGLE BIT ERRORS 



MOV (SP)..RO 

BIT «SU0,9SUR 
BEQ L440 



BR L441 
L440:s::i:: 
:TRAP ON UNCORRECTABLE ERRORS 

L441:i::;:: 



CVMJAAO MSVll.J MEMORY 01 AG. 
OATA UAS 3 WORDS 



11515 045204 
045204 

11516 045210 
045210 
045214 

11517 045222 
045222 
045226 

11516 045230 
045230 



010137 002044 



011637 
163737 

005737 
001007 



002034 
000016 

002144 



053737 002552 



11519 045236 








045236 


017757 




11520 


045244 


104417 




11521 


045246 








045246 






11522 


045246 


000157 


OSOPIP 


11523 








11524 


045252 






11525 


045252 








045252 


010046 






045254 


013746 


000004 




045260 


013746 


000114 


11526 


045264 


010637 


045350 


11527 


045270 


012737 


045330 


11528 


045276 


012737 


045330 


11 529 


045504 


013700 


002034 


11530 045310 








045310 


053737 


002552 


11531 


045316 


011037 


002052 


11532 


045322 


104417 




11533 


045324 


005037 


002144 


11534 


045330 


013706 


045350 


11535 


045334 








045334 


012637 


000114 




045340 


012637 


000004 




045344 


012600 




11536 


045346 


000207 




11537 


045350 


000000 





NIO 

MACRO V05.01b Friday 15-Feb-85 16:10 Page 379 

♦PER30: LET GOOD :« Rl 

LET ADDRESS :« (SP) - 16 



002034 

177776 
002052 



000004 
000114 



177776 



IF ABORTFLAG IS FALSE 



TESTAREA 
BIS TESTMODE.PSU 
.DSABL CRF 

LET BAD 9ADDRESS 

KERNEL 
END ;0F IF ABORTFLAG 

JMP PERRAU 



; ENTER TEST MODE 



MOV Rl.GOOD 

MOV (SP). ADDRESS 
SUB 16. ADDRESS 

TST ABORTFLAG 
BNE L442 

;60 TO SYSTEM TEST MODE 

MOV SADDRESS.BAD 



: ENTER KERNEL MODE 

L442 



> i 



GETDATA.-SUBTST <<GET DATA FROM ABORTED AREA IF POSSIBLE >> 

• ******************************************************************************* 

! ♦SUBTEST GET DATA FROM ABORTED AREA IF POSSIBLE 

i ************************************************* ****************************** 
PUSH RO.4.114 



MOV SP.GETDAl 
MOV «1$.4 
MOV «1$.114 
MOV ADDRESS. RO 
TESTAREA 



MOV RO.-(SP) 
MOV 4.-fSP) 
MOV 114, (SP) 



II; 



GETDAl: 



BIS 
.DSABL 
MOV 
KERNEL 
CLR 
MOV 
POP 



RETURN 
0 



TESTMODE.PSU 
CRF 

(RO).BAD 

ABORTFLAG 
GETDAl. SP 
114. 4, RO 



:G0 TO SYSTEM TEST MODE 



: RESTORE KNOUN GOOD STACK POINTER 

MOV (SP)*.114 
MOV (SP)».4 
MOV (SP)..RO 



SEQ 0337 



cvMjAAO nsvii-j MEnoftr DIAG. 
POUCR FAIL AUTO RESTART 

11540 
11541 
11542 
11543 

11544 045352 



11552 

11553 045352 

11554 045356 

11555 045360 
045360 

11556 045364 

11557 045366 

11558 045374 

11559 045402 
045402 
045404 
045406 
045410 
045412 
045414 
045416 



11560 
11561 



045422 



11562 045426 

11563 045432 
045432 

11564 045434 
11565 

11566 045436 

11567 045442 

11568 045444 

11569 045450 

11570 045454 
045454 

11571 045456 

11572 045460 
045460 
045464 
045466 
045472 

11573 

11574 045472 

11575 045476 

11576 045502 

11577 045506 

11578 045512 

11579 045514 

11580 045516 



005737 
001403 

013746 
104423 

012737 
012737 

010046 
010146 
010246 
010346 
010446 
010546 
013746 

012700 
012701 

014046 
077102 

005737 
001013 
012700 
012701 

014046 
077102 

005737 
001402 
004737 



012700 
012701 
012702 
012703 
011021 
012022 
077303 



002544 



177746 

046300 
000340 



002152 

177700 
000021 



002456 

172300 
000020 



002126 
046306 



172300 
177600 
172200 
000040 



Bll 
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.SBTTL POWER FAIL AUTO RESTART 
.SBTTL ROUTINE POUER OOUN AND UP 
i *****«**«******************************************** *«•••*• 

i POUER DOWN ROUTINE 
$PURDN- 

:SAVE CACHE STATUS 
TST CACHKN 
BEO 51 
PUSH CONTRL 



SEQ 0338 



000024 5$: 
000026 



1): 



2i: 



PDli 



31; 



CACHON 

MOV ffJILLUP.PURVEC ; 
nOV «340.PURVEC*2 



PUSH R0.R1,R2.R3.R4,R5.CSRN0 



TURN CACHE ON 
SET FOR FAST UP 
;PRI0:7 



:SAVE USER PAR'S £ PDR7 
MOV #177700. RO 
MOV #17.. Rl 
PUSH -CRO) 



SOB 



Rl.l* 



MOV CONTRL. -(SP) 



MOV RO, (SP) 
MOV Rl.-(SP) 
MOV R2.-(SP) 
MOV R3.-(SP) 
MOV R4.-(SP) 
MOV R5.-(SP) 
MOV CSRNO.-(SP) 



MOV -(RO).-(SP) 



:SAVE SUPERVISOR PAR'S 



TST 
6NE 
MOV 
MOV 
PUSH 



NOSUPER 
POl 

#172300. RO 
#16., Rl 
-(HO) 



SOB R1.2$ 

IF RLFLAG IS TRUE THEN $CALL UOOPS 



;COPY KERNEL MAP TO USER £ SUPERVISOR 



L443: s : i i : : 



MOV -(RO).-(SP) 



TST RLFLAG 
BEQ L443 
JSR PC. UOOPS 



MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
SOB 



«KIPDRO.RO 
#UIPDR0.R1 
#SIPDR0.R2 
#32., R3 
(RO).(Rl)* 
(R0)*.(R2)» 
R3.3$ 



CVMJAAO MSVll-J MEMORY OIAG. 
ROUTINE POWER DOUN AND UP 

11582 













045520 


05P737 


140000 

WW 


11584 


045526 


010600 




11585 


045530 


104417 




11586 


045532 








045532 


010046 




11587 


045534 


005737 


002456 


11588 


045540 


001006 




11589 045542 








045542 


052737 


040000 


11590 045550 


010600 




11591 


045552 


104417 




11592 


045554 








045554 


010046 




11593 








11594 


045556 


013701 


002224 


11595 


045562 








045562 






11596 


045562 








045562 


005037 


002152 




045566 






11597 


045566 


006301 




11598 


045570 








045570 


103003 




11599 


045572 


104426 




11600 


045574 








045574 


013746 


002150 


11601 


045600 








045600 






11602 


045600 








045600 


005701 






045602 


001407 




11603 


045604 








045604 


062737 


000002 




045612 


023727 


002152 




045620 


003762 






045622 






11604 


045622 








045622 






11605 








11606 


045622 








045622 


013746 


177572 




045626 


013746 


177574 




045632 


013746 


177576 


11607 


045636 


005737 


002456 


11606 


045642 


001002 




11609 


045644 








045644 


013746 


172516 


11610 








11611 


045650 


012700 


172400 


11612 


045654 


012701 


000020 


11613 


045660 








045660 


014046 




11614 


045662 


077102 





Cll 
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177776 



177776 



7$! 



002152 
000036 



4$; 



:SAVE USER 6 SUPERVISOR STACK POINTERS 
USER 

BIS *BIT15!BIT14,PSU ;G0 TO USER MODE 

.OSABL CRF 



MOV USP.RO 

KERNEL 

PUSH RO 

TST NOSUPER 

BNE 7$ 

SUPERVISOR 

BIS *BIT14.PSU 

.DSABL CRF 

MOV SSP.RO 

KERNEL 

PUSH RO 



; ENTER KERNEL MODE 



i ENTER SUPERVISOR MODE 
;G0 TO 



; ENTER KERNEL MODE 



MOV RO, (SP) 



SUPERVISOR MODE 



:SAVE ECC REGISTERS 
MOV TOTCSRS.Rl 
BEGIN LCSRSAVE 



;GET CSR'S 

FOR CSRNO := »0 TO #36 BY #2 

ASL Rl 
ON. ERROR 

READCSR 

PUSH CSR 

END iOF ON. ERROR 

IF Rl EQ #0 THEN LEAVE LCSRSAVE 

END sOF FOR CSRNO 



END LCSRSAVE 

;SAVE MMR0,1,2.3 

PUSH MMR0,MMR1,MMR2 



TST NOSUPER 

BNE 8$ 

PUSH MMR3 

.•SAVE KERNEL PAR'S 

MOV #172400. RO 

MOV #16., Rl 

PUSH -(RO) 



SOB 



R1.4$ 



MOV RO.-(SP) 



B77::;s!:; 

CLR CSRNO 
6100::::::: 

BCC L444 

MOV CSR.-(SP) 

L444: :::::: 

TST Rl 
BEQ E77 

ADD #2. CSRNO 
CMP CSRNO. #36 
BLE BlOO 
ElOO:::::;:: 

E77: :::;;: 



MOV MMRO.-(SP) 
MOV MMRl.-tSP) 
MOV MMRif.-CSP) 



MOV MMR3.-(SP) 



MOV (RO). (SP^ 



SEO 0339 



CVMJAAO MSVll-J MEMORY DIAG. 
ROUTINE POUER OOUN AND UP 



11615 

11616 045664 

11617 045672 
11616 045674 

045674 
045700 

11619 

11620 045704 
045704 

11621 

11622 045710 
11623 

11624 045714 

11625 045722 

11626 045724 



022737 
001004 

013746 
013746 



017746 

010637 

012737 
000000 
000776 



Dll 

MACRO V05.01b Friday 15-Feb-85 16:10 Page 382-1 



000005 004010 



170202 
170200 



134726 
046304 

045726 000024 



;SAVE Q-BUS MAP REGISTERS 

CMP O5.PR0TYP 

BNE 9$ 

PUSH MAPHO.MAPLO 



:IS THIS AN 11/83 ? 
i BRANCH IF NOT 



9i. 



$DOUN: 



sSAVE POSSIBLE SOFTWARE SWITCH REGISTER 
PUSH SSWR 



;SAVE STACK POINTER 
MOV SP,$SAVR6 
sNOW SET UP REAL VECTOR 
MOV #*PURUP,PWRVEC 
HALT 

BR $DOUN 



;SAVE SP 

:SET UP VECTOR 

;HANG UP 



SEQ 0340 



MOV MAPHO,-(SP) 
MOV MAPLO.-(SP) 



MOV 8SWR,-(SP) 



Ell 
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ROUTINE POWER OOUN AND UP SEQ 0341 

11629 t *********************************************** 

11630 :POUER UP ROUTINE 



11631 045726 








IPURUP: 








11635 045726 


012737 


046300 


000024 




MOV *$ILLUP,PURVEC jjSET FOR FAST DOWN 






11636 










; RESTORE STACK POINTER 






11637 045734 


013706 


046304 






MOV $SAVR6,SP ; sGET SP 






11630 045740 


005037 


046304 






CLR $SAVR6 :;UAIT LOOP FOR THE TTY 






11639 045744 


005237 


046304 




11: 


INC $SAVR6 ;!UAIT FOR THE INC 






11640 045750 


001375 








BNE 1$ ::0F A UORD 






11641 










: RESTORE POSSIBLE SOFTWARE SWITCH REGISTER 






11642 045752 










POP 3SWR 






045752 


012677 


134660 








MOV 


(SP)*.9SWR 


11643 045756 


012700 


172340 




10$: 


MOV #172340. RO 




11644 045762 


012702 


172300 






MOV ffKIPDR0.R2 






11645 045766 


012701 


000020 






MOV *16.,R1 






11646 045772 








6$: 


POP (RO)* 






045772 


012620 










MOV 


CSP)».(RO). 


11647 045774 


012722 


077406 






MOV #77406, (R2)* 




11648 046000 


077104 








SOB R1.6$ 






11649 










s RESTORE MMR3.2.1.0 






11650 046002 


005737 


002456 






TST NOSUPER 






11651 046006 


001002 








BNE 11$ 






11652 046010 










POP MMR3 






046010 


012637 


172516 








MOV 


(SP)*.MMR3 


11653 046014 








11$: 


POP MMR2.MMR1.MMR0 






046014 


01263/ 


177576 








MOV 


(SP)*.MMR2 


046020 


012637 


177574 








MOV 


{SP)*.MMR1 


046024 


012637 


177572 








MOV 


(SP)*,MMRO 


11654 










; RESTORE ECC REGISTERS 




11655 046030 


013701 


002224 






MOV TOTCSRS.Rl ;GET CSR'S 






11656 046034 


042701 


177400 






SIC #177400. Rl 






11657 046040 










BEGIN LCSRRESTORE 






046040 










BlOl: 






11658 046040 










FOR CSRNO := «6 DOUNTO #0 BY #2 






046040 


012737 


000036 


002152 






MOV 


#36. CSRNO 


046046 










B102: 




11659 046046 


006201 








ASR Rl 






11660 046050 










ON. ERROR 






046050 


103003 










BCC 


L445 


11661 046052 










POP CSR 






046052 


012637 


002150 








MOV 


(SP)*.CSR 


11662 046056 


104425 








LOADCSR 






11663 046060 










END :0F ON. ERROR 






046060 










L445r 






11664 046060 










IF Rl EQ #0 THEN LEAVE LCSRRESTORE 






046060 


005701 










TST 


Rl 


046062 


001407 










BEQ 


ElOl 


11665 046064 










END ;0F FOR CSRNO 






046064 


162737 


000002 


002152 






SUB 


«2, CSRNO 


046072 


023727 


002152 


000000 






CMP CSRNO. »0 


046100 


002362 










BGE 


6102 


046102 










E102: 






11666 046102 










END LCSRRESTORE 






046102 










ElOl: 


I I i » I § 




11667 










:COPY KERNEL MAP TO USER £ SUPERVISOR 






11668 046102 


012700 


172300 






MOV #KIPDRO.RO 






11669 046106 


012701 


177600 






MOV #UIPDR0.R1 







CVMJAAO MSVll-J MEMORY OIAG. 
ROUTINE POWER OOUN AND UP 

11670 046112 012702 172200 

11671 046116 012703 000040 

11672 046122 011021 

11673 046124 012022 

11674 046126 077303 



Fll 

MACRO VOS.Olb Friday 15-Feb-85 16:10 Page 384 1 



3$: 



MOV 
MOV 
MOV 
MOV 
SOB 



«SIPDR0.R2 
#32. .R3 
(R0).(R1)» 
(R0)*.(R2)^ 
R3,3$ 



SEQ 034? 



I 



CVMJAAO MSVll-J MEMORY DIAG. 
ROUTINE POUER OOUN AND UP 



Gil 
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11676 








HO 1 1 








110 '0 




\A^X Vvv 




11679 


046136 








046136 






11680 


046140 








046140 


052737 


040000 


11681 


046146 






11682 


046150 


104417 




11683 046152 








046152 


012600 




11684 


046154 








046154 


052737 


140000 


11685 


046162 


010006 

WWW 




11686 


046164 


104417 




11687 








11688 


046166 


012700 


172240 


11689 


046172 


012701 


000020 


11690 


046176 








046176 


012620 




11691 


046200 


077102 




11692 








11693 


046202 


012700 


177636 


11694 


046206 


012701 


000021 

W Wb A 


11695 


046212 








046212 


012620 




11696 


046214 


077102 




11697 








11698 


046216 


013777 


002012 


11699 046224 


013737 


002012 


11700 046232 








046232 


012637 


002152 




046236 


012605 






046240 


012604 






046242 


012603 






046244 


012602 






046246 


012601 






046250 


012600 




11701 


046252 


012737 


045352 


11702 


046260 








046260 


104401 


067652 



177776 



13*: 



177776 



7$; 



8$: 



11703 

11704 046264 005737 002544 

11705 046270 001402 

11706 046272 

046272 012637 177746 

11707 046276 000002 

11708 046300 000000 

11709 046302 000776 

11710 046304 000000 
11711 



SEQ 0343 



9*: 

$ILLUP: 
$SAVR6: 



; RESTORE SUPERVISOR t USER STACK POINTERS 
TST NOSUPER 
BNE 13* 
POP RO 

MOV (SP)..RO 

; ENTER SUPERVISOR MODE 
*BIT14.PSW iGO TO SUPERVISOR MODE 

CRF 

RO SSP 

; ENTER KERNEL MODE 

RO 

MOV (SP)*.RO 

USER 
BIS 
.OSABL 
MOV 
KERNEL 

; RESTORE SUPERVISOR PAR' 
MOV #1 72240. RO 
MOV 016., R J 
POP (RO)* 



SUPERVISOR 
BIS 
•OSABL 
fOV 

KERNEL 
POP 



#BIT15!BIT14,PSW 
CRF 

RO.USP 



;G0 TO USER MODE 



; ENTER KERNEL MODE 
S 



SOB Rl,7* 

s RESTORE USER PAR'S 6 PDR7 
MOV #177636. RO 
MOV #17.,R1 
POP (RO)* 

SOB Rl 8$ 

{RESTORE POSSIBLE SOFTWARE DISPLAY REGISTER 

MOV iPATMAR.aOISPLAY 

MOV *PATMAR.DISPREG 

POP CSRN0.R5.R4.R3.R2.R1,R0 



MOV (SP)*.(RO)< 



MOV (SP)*,(RO)» 



#*PURDN.PURVEC 
MSG051 
.MSG051 
CRF 



MOV 
TYPE 
TYPEIT 
.DSABL 
{RESTORE CACHE STATUS 



ss SET UP THE POWER DOWN VECTOR 
s REPORT THE POWER FAILURE 



MOV (SP 
MOV (SP 
MOV (SP 
MOV (SP 
MOV (SP 
MOV (SP 
MOV (SP 



.CSRNO 

.R5 

.R4 

.R3 

.R2 

.Rl 

.RO 



TST 
BEQ 
POP 

RTI 
HALT 
BR 
0 

.EVEN 



CACHKN 
9* 

CONTRL 



$ILLUP 



MOV (SP)*. CONTRL 



THE POWER UP SEQUENCE WAS STARTED 

BEFORE THE POWER DOWN WAS COMPLETE 
PUT THE SP HERE 



CVMJAAO MSVll-J MtMORY DIAG. 
ROUTI^€ POUER DOWN AND UP 



11723 


046306 






11724 


046306 








046306 


013746 


002102 


11725 


046312 


005037 


002102 


11726 


046316 








046316 


010346 






046320 


013703 


002102 




046324 


004737 


035716 




046330 


012603 




11727 


046332 








046332 


052737 


040000 


11728 


046340 


QlHi f 


00002'* 


11729 046346 


013737 


060026 


11730 


046354 








046354 


004537 


041024 




046360 


000105 






046362 


046710 






046364 


126472 




11731 


046366 


rtl 07T7 

Vie 'Of 


AA&A70 


11732 


046374 


012737 


000340 


11733 


046402 








046402 


004537 


041024 




046406 


000071 






046410 


126472 






046412 


046472 




11734 


046414 


012700 


172340 


11735 


046420 


012701 


126654 


11736 


046424 


012702 


000010 


11737 


046430 


012021 




11738 


046432 


077202 




11739 046434 


005737 


002456 


11740 


046440 


001002 




11741 


046442 


013721 


172516 


11742 


046446 


013721 


177576 


11743 


046452 


013721 


177574 


11744 


046456 


013721 


177572 


11745 


046462 


104417 




11746 


046464 








046464 


012637 


002102 


11747 


046470 


000207 
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SEO 0344 



WOC»>S: SUBTST <<POUER FAIL WHILE RELOCATED>> 
;*SUBTEST POUER FAIL WHILE RELOCATED 

PUSH BANK 

nOV BANK,-(SP) 

(TEST AREA) TO BANK 
nOV R3.-(SP) 



177776 

046704 
046706 



060024 
060026 



1$: 



2$: 



CLR 
MAP 

MOV 
CALL 
.OSABL 



BANK 
BANK 

BANK.R3 
MAPPER 
CRF 



;MAP SUPERVISOR SPACE 



; ENTER SUPERVISOR MODE 

;G0 TO SUPERVISOR MODE 



SUPERVISOR 
BIS 0BIT14.PSU 
.DSABL CRF 
MOV FIRST ♦PURVEC.WOOPSAV 
MOV FIRST*PURVEC*2,U00PSAV«2 

BMOV FIRST ♦ UOOPUP . UOOPSAV ^4 . UOOPEND - UOOPUP/2 ♦ 12 . 

JSR R5, BLOCKS 

U00PEND-U00PUP/2*12. 

U00PSAV«4 

FIRST ♦UOOPUP 
DSABL CRF 
MOV ' #U00PUP. FIRST ♦PURVEC 
MOV #340.FIRST*PURVEC*2 
BMOV UOOPUP , FIRST*U00PUP , UOOPEND -UOOPUP/2 

JSR R5.BL0CK3 

UOOPEND -UOOPUP/2 

FIRST^UOOPUP 

UOOPUP 

.DSABL CRF 
#KIPARO.RO 
#FIR3T».400PEND.R1 
*8. .R2 



MOV (SP)..R3 



MOV 
MOV 
MOV 
MOV 
SOB 
TST 
BNE 
MOV 
MOV 
MOV 
MOV 
KERNEL 
POP 

RETURN 



(R0)*.(R1)* 
R2.1* 
NOSUPER 
2% 

MMR3.(R1)* 
MMR2.(R1)* 
MMR1,(R1)* 
MMR0,(R1)* 

BANK 



; ENTER KERNEL MODE 



MOV (SP)«,BANK 



CVMJAAO MSVll J MEMORY OIAG 
POUER FAIL WHILE RELOCATED 



111 
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SEQ 0345 



11750 


046472 








UOOPUP: SUBTST 


<<POUER UP FROM BANK 0 TO RELOCATION>> 












; ********************************************* ********************************* 












s ♦SUBTEST 


POWER UP FROM BANK 0 TO RELOCATION 












: ******************************************************************************* 


11751 


046472 


012700 


046654 




MOV 


«W00PEN0.RO 


11752 


046476 


012701 


172340 




MOV 


OKIPARO.Rl 


11753 


046502 


012703 


172300 




MOV 


SKIPDR0.R3 


11754 


046506 


012702 


000010 




MOV 


*8. ,R2 


11755 


046512 


012021 






1*: MOV 


(R0)*.(R1)* 


11756 


046514 


012723 


077406 




MOV 


#77406, (R3)* 


11757 


046520 


077204 






SOB 


R2.1* 


11758 


046522 


005737 


002456 




TST 


NOSUPER 


11759 


046526 


001002 






BNE 


li 


11760 


046530 


012037 


172516 




MOV 


(R0)*,MMR3 


11761 


046534 


012037 


177576 




3$: MOV 


(R0)*,MMR2 


11762 


046540 


012037 


177574 




MOV 


(R0)*,MMR1 


11763 


046544 


012037 


177572 




MOV 


(RO)*.MMR0 


11764 


046550 


013706 


046304 




MOV 


$SAVR6,SP 


11765 


046554 








PUSH 


BANK 




046554 


013746 


002102 






MOV BANK.-(SP) 


11766 


046560 


005037 


002102 




CLR 


BANK 


11767 


046564 








MAP 


BANK J MAP SUPERVISOR SPACE (TEST AREA) TO BANK 




046564 


010346 








MOV R3. (SP) 




046566 


013703 


002102 




MOV 


BANK,R3 




046572 


004737 


035716 




CALL 


MAPPER 












.OSABL 


CRF 




046576 


012603 








MOV (SP)».R3 


11768 


046600 








SUPERVISOR {ENTER SUPERVISOR MODE 




046600 


052737 


040000 


177776 


BIS 


*BIT14.PSW sGO TO SUPERVISOR MODE 












.DSABL 


CRF 


11769 


046606 


013737 


046704 


060024 


MOV 


WOOPSAV, FIRST ♦PWRVEC 


11770 


046614 


013737 


046706 


060026 


MOV 


W00PSAV*2,FIRST*PWRVEC*2 



11771 
11772 
11773 
11774 
11775 
11776 
11777 



046622 
046626 
046632 
046636 
046640 



11778 

11779 046642 

11780 046644 
046644 

11781 046650 

11782 046654 
11785 046704 



012700 
012701 
012702 
012022 
077102 

104417 

012637 
000137 
000014 
000107 



046710 
000105 
126472 



002102 
045726 



2$: 



iBMOV 
MOV 
MOV 
MOV 
MOV 
SOB 

KERNEL 
POP 



JMP 

UOOPEND: .REPT 
WOOPSAV: .REPT 



{SIMULATE THE FOLLOWING BLOCK MOV BUT WITH NO STACK ACCESSES 



WOOPSAV +4 , riRST ♦WOOPUP , WOOPEND- W00PUP/2*12 . 
»W00PSAV«4,R0 
»W00PEND-Ur)0PUP/2*12. ,R1 
#FIRST*W00>'UP,R2 
(R0)*.(R2)* 
Rl,2$ 



BANK 



{ENTER KERNEL MODE 



♦PWRUP 
12. 

WOOPEND W00PUP/2*12.*2 



MOV (SP)«.BANK 



CVMJAAO MSVll-J MEMORY DIAG. 
10 SUBROUTINES 



11790 
11791 
11792 
11793 
11794 
11795 
11796 
11797 
11798 
11799 

iiaoo 

11801 
11802 
11803 
11804 
11905 
11806 
11807 
11808 
11809 
11810 
11811 
11812 
11813 
11814 
11815 
11816 
11817 
11818 
11819 
11820 
11821 
11822 
11823 
11824 
11825 



11826 
11827 
11828 
11829 
11830 
11831 
11832 
11833 
11834 
11835 
11836 
11837 
11838 
11839 
11840 

11841 
11842 
11843 



047122 
047126 

047130 
047132 
047136 
047140 
047142 
047144 
047146 
047152 
047154 
047160 
047162 
047166 
047172 
047174 
047176 
047176 

047200 
047202 
047206 
047210 
047214 
047220 
047222 

047226 
047232 
047234 
047240 
047244 
047246 
047250 
047250 
047252 
047256 
047262 



105737 
100407 
010046 
017600 
112046 
001005 
005726 
012600 
062716 
000002 
122716 
001002 
112716 
122716 
001006 
005726 

104401 

002660 
105037 
000753 
004737 
123726 
001346 
013746 

105366 
002770 
004737 
105337 
000770 
000000 

010146 
116601 
005737 
001402 
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.SBTTL 10 SUBROUTINES 
•SBTTL ROUTINE TYPE 

******************************************************************************* 

♦ROUTINE TO TYPE ASCIZ MESSAGE . MESSAGE MUST TERMINATE UITH A 0 BYTE. 
♦THE ROUTINE WILL INSERT A NUMBER OF NULL CHARACTERS AFTER A LINE FEED. 
♦NOTEl: JNULL CONTAINS THE CHARACTER TO BE USED AS THE FILLER CHARACTER. 

♦N0TE2: JFILLS CONTAINS THE NUMBER OF FILLER CHARACTERS REQUIRED. 

♦N0TE3: *FILLC CONTAINS THE CHARACTER TO FILL AFTER. 

♦ 

♦CALL : 

♦1) USING A TRAP INSTRUCTION 

siMESADR IS FIRST ADDRESS OF AN ASCIZ STRING 



SEQ 0346 



002360 
000002 

000002 

000011 

000040 
000200 



047434 

047250 
002652 

002356 

000001 

047250 
047434 



000004 
002544 



♦ 

♦OR 
♦ 
♦ 
♦ 



TYPE 

TYPE 
MESADR 



MESADR 



$TYPE: 


TSTB 


$TPFL6 






6$ 


li: 


MOV 


RO.-CSP) 




MOV 


a2CSP),R0 


4$: 


MOVB 


(RO)*,-(SP) 




BNE 


7$ 




TST 


(SP)* 


5t: 


MOV 


(SP)*.RO 


bi: 


ADD 


#2.(SP) 




RTI 




7$: 


CMPB 


OHT.CSP) 




BNE 


11$ 




MOVB 


*' ,(SP) 


11$ : 


CMPB 


ffCRLF.CSP) 




BNE 


8$ 




TST 


(SP)* 




TYPE 






TYPEIT 






.DSABL 


CRF 




$CRLF 






CLRB 


$CHARCNT 




BR 


4$ 


81: 


CALL 


$TYPEC 


9$: 


CMPB 


$FILLC.(SP) 




BNE 


4$ 




MOV 


$NULL.-(SP) 


10$: 


DECS 


KSP) 




BLT 


9$ 




CALL 


$TYPEC 




DEC6 


$CHARCNT 




BR 


10$ 


XOCHAR : 


.UORD 0 




$TYPEC: 


PUSH 


Rl 




MOVB 


4(SP).R1 




TST 


CACHKN 




BEQ 


2$ 



:IS THERE A TERMINAL? 
BR IF NO 
SAVE RO 

GET ADDRESS OF ASCIZ STRING 
PUSH CHARACTER TO BE TYPED ONTO STACK 
BR IF IT ISN'T THE TERMINATOR 
IF TERMINATOR POP IT OFF THE STACK 
RESTORE RO 
ADJUST RETURN PC 
RETURN 
BRANCH IF NOT <HT> 

REPLACE TAB UITH SPACE 
! BRANCH IF NOT <CRLF> 

;POP <CR><LF> EJUIV 
;TYPE A CR AND LF 



CLEAR CHARACTER COUNT 

GET NEXT CHARACTER 

GO TYPE THIS CHARACTER 

IS IT TIME FOR FILLER CHARS.? 

IF NO GO GET NEXT CHAR. 

GET » OF FILLER CHARS. NEEDED 

AND THE NULL CHAR. 

DOES A NULL NEED TO BE TYPED? 

BR IF NO- -GO POP THE NULL OFF OF STACK 

GO TYPE A NULL 

DO NOT C0Uf4T AS A COUNT 

LOOP 



MOV Rl.-(SP) 



CVMJAAO MSVll- 
ROUTINE TYPE 



J HEHORY DIAG. 



11844 


047264 








047264 


013746 


177746 


11845 


047270 








047270 


010046 




11846 


047272 


104424 




11871 


047274 


105777 


133346 


11872 


047300 


100375 




11873 


047302 


005037 


047246 


11874 


047306 


105777 


133330 


11875 


047312 


100032 




11876 


047314 


117737 


133324 


11877 


047322 


042737 


177600 


11878 


047330 


023727 


047246 


11879 047336 


001020 




11880 


047340 


105777 


133276 


11881 


047344 


100375 




11882 


047346 


117737 


133272 


11883 


047354 


042737 


177600 


11884 


047362 








047362 


023727 


047246 




047370 


001002 




11885 047372 


000402 




11886 


047374 








047374 


000401 






047376 






11887 


047376 


000760 




11888 


047400 








047400 






11889 


047400 


110177 


133244 


11893 


047404 


122766 


000015 


11894 


047412 


001003 




11895 


047414 


105037 


047434 


11896 


047420 


000406 




11897 


047422 


122766 


000012 


11898 


047430 


001402 




11899 


047432 


105227 




11900 


047434 


000000 




11901 


047436 








047436 


012600 




11902 


047440 


005737 


002544 


11903 


047444 


001402 




11904 


047446 








047446 


012637 


177746 


11905 


047452 








047452 


012601 




11906 


047454 


000207 




11907 


047456 







Kll 

MACRO VOS.Olb Friday 15-Feb-8S 16:10 Page 390 1 



SEQ 0347 



21: 



PUSH 
PUSH 



CONTRL 
RO 



CACHGFF 

TSTB a*TPS 
BPL 3$ 



:TURN CACHE OFF 

jsUAIT UNTIL PRINTER IS READY 



MOV CONTRL. -(SP) 
MOV RO.-(SP) 



047246 
047246 
000023 



047246 
047246 

000021 



CLR 


XOCHAR 




TSTB 


a$TKS 


CHECK FOR XOFF 


BPL 


NC 


;;SKIP IF NO CHARACTER 


MOVB 


3$ T KB. XOCHAR 


jiSAVE THE CHARACTER 


BIC 


*tC177, XOCHAR 


STRIP OFF ASCII 


CMP 


XOCHAR, *023 


::UAS IT A CONTROL S? 


BNE 


NC 


; : BRANCH IF NOT 


TSTB 


S^TKS 


; ;UAIT FOR CHARACTER 


BPL 


C0NTS3 




MOVB 


3$TKB, XOCHAR 


ssGET CHARACTER 


BIC 


fftC177, XOCHAR 


ssSTRIP OFF ASCII 


IF XOCHAR EQ 021 


s; IF IT IS A to 


BR 


NC 




ELSE 






BR 


C0NTS3 




END :0F 


IF XOCHAR 





L446: 



CMP XOCHAR. 021 
BNE L446 



BR L447 



000002 



000002 U 



NC: MOVB 
CMPB 
BNE 
CLRB 
BR 

CMPB 
BEQ 
INCB 
$CHARCNT: .WORD 
$TYPEX: POP 



Rl.ajTPB 

#CR.2(SP) 

li 

iCHARCNT 

<TYPEX 

#LF.2(SP) 

JTYPEX 

(PC)* 

0 

RO 



L447::::s;; 
LOAD CHAR TO BE TYPED INTO DATA REG. 
IS CHARACTER A CARRIAGE RETURN? 
BRANCH IF NO 

YES- -CLEAR CHARACTER COUNT 
EXIT 

IS CHARACTER A LINE FEED? 
BRANCH IF YES 
COUNT THE CHARACTER 
CHARACTER COUNT STORAGE 



TST CACHKN 
BEQ 2$ 
POP CONTRL 



IS THERE A CACHE? 
BRANCH IF NOT 
POP CACHE STATUS 



MOV CSP)*.RO 



2i. 



POP 



Rl 



RETURN 

SUPLIMIT :;!!!!!! ! ! ! ! ! ! THIS IS 



MOV (SP)*. CONTRL 
MOV (SP)«.R1 
THE LIMIT ON SUPERVISOR MAPPED TO MUT SPACE 



CVnjAAO HSVll J MEMORY OIAG. 
ERROR DATA SETUP 

12585 

12586 

12587 

12588 

12589 

12590 

12591 

12592 

12593 

12594 

12595 

12596 

12597 

12598 

12599 

12600 

12601 

12602 

12603 

12604 

12605 

12606 

12607 

12608 

12609 

12610 

12611 

12612 

12613 

12614 

12615 

12616 

12617 

12618 

12619 

12620 

12621 

12622 

12623 

12624 

12625 

12626 

12627 

12628 

12629 

12630 

12631 

12632 

12633 

12634 

12635 

12636 

12637 

12638 

12639 

12640 

12641 



Lll 
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SEQ 0348 



.SBTTL ERROR DATA SETUP 

USE THIS IF THIS CONDITION OISCRIBES THE ERROR 

PERROl TRAP 

BAD DATA IN RO UNLESS ABORTED 

THEN BAD DATA IS POINTED TO BY -(R4) 
GOOD DATA IN R5 

PERR02 TRAP 

BAD DATA IN Rl UNLESS ABORTED 

THEN BAD DATA IS POINTED TO BY -(R4) 
GOOD DATA IN R2 

PERR03 TRAP 

BAD DATA IS POINTED TO BY -(Rl) 
GOOD DATA IN R4 

PERR04 TRAP 

BAD DATA IN R4 UNLESS ABORTED 

THEN BAD DATA IS POINTED TO BY 2(R0) 
GOOD DATA IN R2 

PERR05 JSR PC 

BAD DATA IS POINTED TO BY -(RO) 
GOOD DATA IN R2 

RETURN AFTER SETTING UP GOOD. BAD, ADDRESS 

PERR06 JSR PC 

BAD DATA IS POINTED TO BY -(RO) 
GOOD DATA IS ZERO 

RETURN AFTER SETTING UP GOOD, BAD, ADDRESS 

PERR07 TRAP 

BAD DATA IN R2 UNLESS ABORTED 

THEN BAD DATA IS POINTED TO BY (Rl) 
GOOD DATA IN DATBUF 

PERRIO TRAP 

BAD DATA IN R2 UNLESS ABORTED 

THEN BAD DATA IS POINTED TO BY 2(R1) 
GOOD DATA IN DATBUF «2 

PERRll TRAP 

BYTE TEST 

BAD DATA IN RIGHT BYTE OF RO UNLESS ABORTED 
THEN BAD DATA IS POINTED TO BY (Rl) 
GOOD DATA IS A ZERO BYTE 

PERR12 TRAP 

BYTE TEST 

BAD DATA IN RIGHT BYTE OF RO UNLESS ABORTED 
THEN BAD DATA IS POINTED TO BY (Rl) 
GOOD DATA IS A BYTE OF ONES 

PERR13 TRAP 

BAD DATA IN RO UNLESS ABORTED 



CVMJAW MSVll-J MEMORY DIA6. 
ERROR DATA SETUP 



MACRO VOS.Olb Friday 



12642 

12643 

12644 

12645 

12646 

12647 

12648 

12b49 

12650 

12651 

12652 

12653 

12654 

12655 

12656 

12657 

12658 

12659 

12660 

12661 

12662 

12663 

12664 

12665 

12666 

12667 

12668 

12669 

12670 

12671 

12672 

12673 

12674 

12675 

12676 

12677 

12678 

12679 

12680 

12681 

12682 

12683 

12684 

12685 

12686 

12687 

12688 

12689 

12690 

12691 

12692 

12693 

12694 

12695 

12696 

12697 

12698 



PERR14 



PERR15 



PERR16 



PERR17 



PERR20 



PERR21 



PERR22 



PERR23 



PERR24 



PERR25 



t PPRR26 



Mil 
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SEQ 0349 

THEN BAD DATA IS POINTED TO BY (Rl) 
GOOD DATA IS ZERO 

TRAP 

BAD DATA IN RO UNLESS ABORTED 

THEN BAD DATA IS POINTED TO BY (Rl) 
GOOD DATA IS ONES 

TRAP 

BAD DATA IN RO UNLESS ABORTED 

THEN BAD DATA IS POINTED TO BY (Rl) 
GOOD DATA IN TSTDAT 

TRAP 

BAD DATA IN RO UNLESS ABORTED 

THEN BAD DATA IS POINTED TO BY (Rl) 
GOOD DATA IN TSTDAT «2 

TRAP 

BAD DATA IN RO UNLESS ABORTED 

THEN BAD DATA IS POINTED TO BY (Rl) 
GOOD DATA IN R2 

TRAP 

BAD DATA IN RO UNLESS ABORTED 

THEN BAD DATA IS POINTED TO BY (Rl) 
GOOD DATA IN R3 

TRAP 

7 BIT BYTE TEST 

BAD DATA IN RIGHT BYTE OF RO UNLESS ABORTED 
THEN BAD DATA IS POINTED TO BY (Rl) 
GOOD DATA IS A 7 BIT BYTE ON ONES 

TRAP 

BAD DATA IN R2 UNLESS ABORTED 

THEN BAD DATA IS POINTED TO BY (Rl) 
GOOD DATA IN RO 

TRAP 

BAD DATA IN RO UNLESS ABORTED 

THEN BAD DATA IS POINTED TO BY (Rl) 
GOOD DATA IN R4 

TRAP 

BAD DATA IN RO UNLESS ABORTED 

THEN BAD DATA IS POINTED TO BY (R2) 
GOOD DATA IN R3 

TRAP 

BAD DATA POINTED TO BY -(Rl) 
GOOD DATA IN R2 UNLESS LOC V177654 IS SET 
THEN GOOD DATA IS IN R3 

TRAP 

BAD DATA IS DOUBLE UORD POINTED TO BY Rl AND IN LOU 7 BITS OF RO 
GOOD DATA IS 000000. .100000. . 100 



CVMJAAO MSVll-J MEMORY DIAG. 
ERROR DATA SETUP 

12699 

12700 

12701 

12702 

12703 

12704 

12705 

12706 

12707 

12700 

12709 

12710 

12711 

12712 

12713 

12714 

12715 

12716 

12717 

12710 

12719 

12720 

12721 

12722 

12723 

12724 

12725 

12726 
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SEQ 0350 



PERP27 TRAP 

BAD DATA IS DOUBLE UORD POINTED ^0 BY Rl AND IN lOU 7 BITS OF RO 
GOOD DATA IS 000000. .000000. .077 

PERR30 TRAP 

BAD DATA IS POINTED TO BY -16(SP) 
GOOD DATA IS IN Rl 

PERR31 TRAP 

SPECIAL ECC FAILURE HANDLER 

PERR32 TRAP 

SPECIAL ECC FAILURE HANDLER 

PERR33 TRAP 

SPECIAL ECC FAILURE HANDLER 

PERR34 TRAP 

SPECIAL ECC FAILURE HANDLER 

PERR35 TRAP 

SPECIAL BRANCH GOBBLE FAILURE HANDLER 

CALLING SEQUENCE FOR TRAP TYPES 



BEQ 2i 
PERRXX 

2i : NEXT INSTRUCTION 



NO - ERROR. BRANCH FOR CARD 
TRAP TO ERROR ROUTINE 
CONTINUE TESTING 



CvnjAAo nsvii-j nEfORY 01 AG. 
ERROR DATA SETUP 



12729 04745' 

12730 047462 

12731 047470 

12732 047474 

12733 047500 
12734 

12735 047504 

12736 047510 

12737 047516 
12736 047022 
12739 047526 
12740 

12741 047532 

12742 047536 

12743 047544 

12744 047550 

12745 047556 
12746 

12747 047562 

12748 047566 

12749 047574 

12750 047600 

12751 047604 
12752 

12753 047610 

12754 047614 

12755 047620 

12756 047624 

12757 047630 

12758 047634 
12759 

12760 04/636 

12761 047642 
12762 

12763 047644 

12764 047650 

12765 047654 

12766 047662 
12767 

12768 047666 
047666 
047672 

12769 047700 
047700 

12770 047704 
047704 

12771 047712 
12772 

12773 047716 
047716 

12774 047722 
047722 

12775 047726 
047726 

12776 047732 
12777 

12778 047756 
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SEQ 0351 



010437 


002054 




»rcn01 : 


nov 




162737 


000002 


002034 




CIA 


jk'i Ar%r%Dccc 


010037 


AA^AC^ 






MAU 

nuv 


KU t dAU 


010537 


002044 






nov 


R5.G000 


000137 


050212 






JMP 


PERRAU 


010437 


002034 




AOCOA? . 

♦rcR02: 


MAU 

nuv 


OA AAAOCCC 


10« '37 




AA9AVA 




CI n 


vc • nUUnC.39 


Al A1 


AA3AC3 






nuv 


Nl ,dHU 


010237 


002044 






nov 


R2.G00D 


000137 


050212 






jnp 


PERRAU 


m A1 T7 








MAU 

nuv 




lot 1 J 1 


AAAAAO 


\JMc\Ji'* 




CI n 


AO Annorcc 










MTIU 

nuv 


OA finnn 


016137 


177776 


002052 




MOV 


-2(R1).BA0 


000137 


050212 






jnp 


PERRAU 


01(/U3 f 








Mnu 
nuv 


on Annorcc 


1 t 37T7 


AAAAA3 


AAOAT^ 

0UcU3* 




CI n 


A3 Annorcc 


01W3 f 


AA3A^3 






Mnv/ 
nuv 


OA RAn 


A1 rt3T7 
UlUc3 ' 








MOV 


R2,G000 


000137 


050212 






JMP 


PERRAU 


vlvei f 








MOV 


R2,G000 


014037 


002052 




PERA05: 


MOV 


-(RO).BAD 


010037 


002034 






MOV 


RO, ADDRESS 


A&37AA 


AAAAA3 






ADO 


02, RO 


rtrtA7T7 








CALL BADSTACK 


yjwcv f 








RETURN 


005037 


002044 




PERR06: 


CLR 


GOOD 


vOO 








BR 


PERA05 


mm T7 








MOV 


Rl. ADDRESS 


Al rt3T7 

UIUe3< 


AA3A^3 






MOV 


R2.BAD 


U13 ' 3 ' 








MOV 


DATBUF.GOOO 


AAA1 T7 


nCA31 3 
U3Uclc 






JMP 


PERRAU 








♦PERIO: 


LET 


ADDRESS Rl * 


010137 


002034 










A&37X7 
UOc 191 




















LET 


BAD :* R2 


ftl ft3X7 




















LET 


GOOD := DATBIJF»4 


A1 T7X7 




















JMP 


PERRAU 








*PER11: 


LET 


ADDRESS := Rl 


0101S7 




















LET 


BAD := RO 


010037 


002052 


















LET 


GOOD := SO 


005037 


002044 










000137 


050264 






JMP 


PERRAB 








$PER12: 


LET 


ADDRESS : Rl 



: RESTORE RO 



#2 



nov Rl. ADDRESS 
ADD «2. ADDRESS 

MOV R2.6AD 

nov DATBUF.2.G000 

nov Rl. ADDRESS 
nov RO.BAD 
CLR GOOD 



cvnjAAO nsvii-j nenoRY oiag. 

ERROR DATA SETUP 

047736 010137 002034 

12779 047742 

047742 010037 002052 

12780 047746 

047746 012737 000377 

12781 047754 000137 050264 



C12 
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002044 



LET BAD := RO 
LET GOOD := #377 
JhP PERRAB 



MOV Rl. ADDRESS 
HOV RO.BAD 
nOV •377. GOOD 



SEQ 0352 



CVMJAAO MSVll-J MEMORY 
ERROR DATA SETUP 



D12 
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12784 

12785 

12786 

12787 
12788 
12789 

12790 

12791 

12792 
12793 
12794 

12795 

12796 

12797 
12798 
12799 

12800 

12601 

12802 
12803 
12804 

12805 

12806 

12807 
12808 
12809 

12810 

12811 

12812 
12813 
12814 

12815 

12816 

12817 
12818 
12819 



047760 
047760 
047764 
047764 
047770 
047770 
047774 

050000 
050000 
050004 
050004 
050010 
050010 
050016 

050022 
050022 
050026 
050026 
050032 
050032 
050040 

050044 
050044 
050050 
050050 
050054 
050054 
050062 

050064 
050064 
050070 
050070 
050074 
050074 
050100 

050102 
050102 
050106 
050106 
050112 
050112 
050116 

050120 
050120 
050124 
050124 
050130 
050130 
050136 

050140 



010137 

010C37 

005037 
000137 

010137 

010037 

013737 
000137 

010137 

010037 

013737 
000137 

010137 

010037 

013737 
000453 

010137 

010037 

010237 
000444 

010137 

010037 

010337 
000435 

010137 

010037 

012737 
000477 



002034 
002052 

002044 
050212 

002034 
002052 

002614 
050212 

002034 

002052 

002246 
050212 

002034 
002052 
002250 

002034 
002052 
002044 

002034 
002052 
002044 

002034 
002052 
000177 



002044 



002044 



002044 



002044 



$PER13: LET 
LET 
wET 
JMP 

$PER14: LET 

LET 
LET 
JMP 

$PER15: LET 
LET 
LET 
JMP 

$PER16: LET 
LET 
LET 
BR 

$PER17: LET 
LET 
LET 
BR 

$PER20: LET 
LET 
LET 
BR 

*PER21: LET 
LET 
LET 
BR 

$PER22: LET 



ADDRESS :* Rl 
BAD :> RO 
GOOD 00 

PERRAU 
ADDRESS := Rl 
BAD := RO 
GOOD := ONES 

PERRAU 
ADDRESS :- Rl 
BAD := RO 
GOOD := TSTDAT 

PERRAU 
ADDRESS :<= Rl 
BAD RO 
GOOD :« TSTDAT*2 

PERRAU 
ADDRESS Rl 
BAD RO 
GOOD R2 

PERRAU 
ADDRESS Rl 
BAD :> RO 
GOOD := R3 

PERRAU 
ADDRESS Rl 
BAD RO 
GOOD :« #177 

PERRA7 
ADDRESS I' Rl 



SEQ 0353 

MOV Rl, ADDRESS 
MOV RO.BAD 
CLR GOOD 

MOV Rl. ADDRESS 
MOV RO.BAD 
MOV ONES. GOOD 

MOV Rl. ADDRESS 

MOV RO.BAD 

MOV TSTDAT, GOOD 

MOV Rl, ADDRESS 

MOV RO,BAD 

MOV TSTDAT. 2. GOOD 

MOV Rl. ADDRESS 
MOV RO.BAD 
MOV R2.G00D 

MOV Rl. ADDRESS 
MOV RO.BAD 
MOV R3.G00D 

MOV Rl. ADDRESS 
MOV RO.BAD 
MOV «1 77. GOOD 



CVMJAAO MSVll-J MeMORY OIAG. 
ERROR DATA SETllP 

050140 010137 002034 
12820 050144 

050144 010237 002052 
12S21 050150 

050150 010037 002044 
12822 050154 000416 
12823 

12824 050156 

050156 010137 002034 

12825 050162 

050162 010037 002052 

12826 050166 

050166 010437 002044 

12827 050172 000407 
12828 

12829 050174 

050174 010237 002034 

12830 050200 

050200 010037 002052 

12831 050204 

050204 01C337 002044 

12832 050210 000400 
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LET BAD R2 

LET GQOO RO 

BR PERRAU 
$PER23: LET ADDRESS :- Rl 

LET BAD RO 

LET GOOD R4 

BR PERRAU 
«PER24: LET ADDRESS :* R2 

LET BAD RO 

LET GOOD := R3 

BR PERRAU 



MOV Rl, ADDRESS 
nOV R2.BA0 
MOV RO.GOOO 

MOV Rl. ADDRESS 
HOV RO.BAD 
MOV R4.G00D 

MOV R2, ADDRESS 
MOV RO.BAD 
MOV R3,G00D 



CVMJAAO MSVll-J MEMWY DIAG, 
ERROA DATA SETUP 

12834 050212 
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PwrtRAU: SUBTST <<DATA UAS A UORD>> 

t********************** f *********************************************** t******* 

;*SUBTEST DATA UAS A UORO 

;***•**************************************************•**«*••***«**•«•«**««*««« 



SEQ 0355 



















TP ARnOTPI All TC TOI IP TMPM irai i f^PTDATA 






\J\Jj ' 0 ' 


Wei** 




TCT ARnOTPI 


VjVCCC 








RPQ 1 A^n 
DC II L*9U 










ICO or CPTHATA 










ICOOf v^vC^V 






TP RflrtPr PQ &(\ THPN ITAI 1 RAn<;TArK 






005737 


00909P 




TQT RAnor 


V JVC 


00100? 






RNF 1 AS1 




004717 

WW^ » J ' 


034 ISP 




ICR Pr RAOCTAri/ 








L451 • • 


12S3S 050242 


004737 


05042? 


CALL PFRXQR 










TF ARnPTFI A(; T<^ FAI ^F 




0S0P46 


005737 


00? 144 




TCT ARORTFI AR 


050252 


001002 






BNE L452 


12840 050254 


104011 




ERROR 'll 




12841 050256 






ELSE 




050256 


000401 






BR L453 


050260 






L452;: 




12842 050260 


104012 




ERROR ♦12 




12843 050262 






END ;0F IF AB0RTFLA6 




050262 






L453-; 




12844 050262 


000002 




RTI 




12845 










12846 050264 






PERRAB: SUBTST <<DATA UAS A BYTE>> 





t ******************************************************************************* 

i*SUBTEST DATA UAS A BYTE 

i******************************************************************************* 



12847 


050264 


004737 


050446 


CALL PERBNK 






12848 


050270 






IF ABORTFLAG IS TRUE THEN 


$CALL GETOATA 






050270 


005737 


002144 






TST ABORTFLAG 




050274 


001402 








BEQ L454 




050276 


004737 


045252 






JSR PC.6ETDATA 




050302 








L454:; 


12849 


050302 






IF BAOPC EQ »0 THEN $CALL 


BADSTACK 






050302 


005737 


002022 






TST BAOPC 




050306 


001002 








BNE L455 




050310 


004737 


034152 






JSR PC. BADSTACK 




050314 








L455:! 




12850 


050314 


004737 


050422 


CALL PERXOR 






12851 


050320 






IF ABORTFLAG IS FALSE 








050320 


005737 


002144 






TST ABORTFLAG 




050324 


001002 








BNE L456 


12852 


050326 


104014 




ERROR *14 






12853 


050330 






ELSE 








050330 


000401 








BR L457 




050332 








L456;: 




12854 


050332 


104015 




ERROR ♦IS 






12855 


050334 






END :0F IF ABORTFLAG 








050334 








L457:: 




12856 


050334 


000002 




RTI 







CVMJAAO MSVll-J MEMORY 01 AG. 
DATA UAS A BYTE 



12859 050336 






12860 050336 






050336 


005737 


002022 


050342 


001002 




050344 


004737 


034152 


050350 






12861 050350 


004737 


050422 


12862 050354 


004737 


050446 


12863 050360 


104022 




12864 050362 


000002 




12865 






12866 050364 






050364 


012737 


100000 


12867 050372 






050372 


012737 


000100 


12868 050400 


000137 


045040 


12869 






12870 050404 


005037 


002046 


12871 050410 






050410 


012737 


000077 


12872 050416 


000137 


045040 


12873 






12874 050422 







12875 050422 
050422 

12876 050424 

12877 050430 

12878 050436 

12879 050442 
050442 

12880 050444 



010046 
013700 
013737 
074037 

012600 
000207 



002044 
002052 
002060 
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PERRA7: SUBTST <<DATA UAS A 7 BIT BYTE>> 

; ******************************************************************************* 

;*SUBTEST DATA UAS A 7 BIT BYTE 

IF BADPC EQ #0 THEN $CALL BADSTACK 

TST BAOPC 

BNE L460 

JSR PC. BADSTACK 

L460:;;!; js 

CALL PERXOR 
CALL PER6NK 
ERROR *22 
RTI 



SEQ 0356 



002046 
002050 

002050 



002060 



«PER26: LET G00D2 := #100000 

LET 600D3 «100 

JMP PERRA3 

$PER27: CLR G00D2 

LET G00D3 := *077 

JMP PERRA3 



MOV «100000.G0002 
MOV «100.&00D3 

MOV «077,G0003 



PERXOR: SUBTST <<DETERMINE XOR OF GOOD £ BAD>> 

; ******************************************************************************* 

:*SUBTEST DETERMINE XOR OF GOOD € BAD 

•,*************************************************************************m***** 

PUSH RO 

MOV RO. (SP) 

MOV GOOD.RO 
MOV BAD.BADXOR 
XOR RO.BAOXOR 
POP RO 

MOV (SP^.RC 

RETURN 



I 



CVMJAAO MSVll J MEMORY DIAG. 
DETERMINE XOR OF GOOD L BAD 



12883 


050446 






12864 








12885 


050446 








050446 


010046 






050450 


010146 




12886 


050452 


013701 


002102 


12887 


050456 


006301 




12888 


050460 


006301 




12889 


050462 


052761 


000001 


12890 


050470 


105261 


002666 


12891 


050474 


001002 




12892 


050476 


105361 


002666 


12893 


050502 


126137 


002666 


12894 


050510 


101403 




12895 


050512 








050512 


012737 


177777 


12896 


050520 








050520 


012601 






050522 


012600 




12897 


050524 


000207 




12898 








12899 


050526 


010037 


002052 


12900 


050532 








050532 


023737 


002034 




050540 


001004 




12901 


050542 


013737 


002246 


12902 


050550 








050550 


000403 






050552 






12903 


050552 


013737 


002250 


12904 


050560 








050560 






12905 


050560 


004737 


050422 


12906 


050564 








050564 


012737 


177777 


12907 


050572 


000207 




12908 








12909 


050574 








050574 


023727 


002300 




050602 


001001 




12910 


050604 


104023 




12911 


050606 








050606 






12912 


050606 








050606 


005737 


002022 




050612 


001002 






050614 


004737 


034152 




050620 






12913 


050620 


004737 


050526 


12914 


0«:0624 








050624 


023727 


002300 




050632 


001001 




12915 


050634 


104037 




12916 


050636 
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PERBNK: SUBTST<<LOG ERROR ON BAD BANK>> 
******************************************************************************* 

*SUBTEST LOG ERROR ON BAD BANK 

********************************************************** 

:UHILE WE'RE HERE LET'S MARK THE BAD BANK IN THE CONFIGURATION TABLE 
PUSH RO.Rl 

MOV RO.-(SP) 
MOV R1,-(SP) 



SEQ 0357 



12*: 



MOV 


BANK.Rl 




ASL 


Rl 




ASL 


Rl 




BIS 


#BIT0.C0NFIG(R1) 




INCB 


C0NFIG*2(R1) 


sBUMP BANK COUNTER 


BNE 


12$ 


iNO OVERFLOW - SKIP 


DECB 


C0NFIG*2(R1) 


;SET BACK TO 255. 


CMPB 


C0NFIG*2(R1).ERRMAX 


ilS IT PAST MAX? 


BLOS 


11* 


iNO SKIP 


SET 


TOOMANY 


iYES 


POP 


Rl.RO 





RETURN 



PERECC: MOV 



RO.BAD 



IF ADDRESS EQ TESTADD 



MOV TSTDAT.GOOD 
ELSE 



MOV TSTDAT»2.G00D 
END sOF IF CRD 



CALL 
SET 



PERXOR 
HEADER 



RETURN 

$PER31: IF REALPAT EQ #41 
ERROR *23 



END 

IF BADPC EQ #0 THEN JCALL BADSTACK 



CALL PERECC 
IF REALPAT EQ #11 



ERROR *ll 
END sOF IF REALPAT 



L463: 



L464: 



MOV #-1. TOOMANY 

MOV (SP)»,R1 
MOV (SP)».RO 



CMP ADDRESS. TESTADD 
BNE L461 



BR L462 
L461:i;::i: 

L462::::ii: 



MOV #-1. HEADER 



CMP REALPAT, #41 
BNE L463 



TST BADPC 

BNE L464 

JSR PC. BADSTACK 



CMP REALPAT, #11 
BNE L465 



CVMJAAO MSVll-J MEMORY OIAG. 
LOG ERROR ON BAD BANK 
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050636 

12917 050636 
050636 
050644 

12918 050646 

12919 050650 
050650 

12920 050650 
050650 
050656 

12921 050660 

12922 050662 
050662 

12923 050662 
050662 

12924 050670 



023727 
001001 
104043 



023727 
001001 
104044 



012737 
000002 



002300 000015 



002300 000016 



177777 002612 



IF REALPAT EQ 015 



ERROR «43 
END :0F IF REALPAT 

IF REALPAT EQ »16 



ERROR *44 
END :0F IF REALPAT 

SET HEADER 

RTI 



L465: 



L466: 



L467: 



SEQ 0358 



CMP REALPAT. #15 
BNE L466 



CMP REALPAT. »16 
BNE L467 



MOV »-l. HEADER 



CVMJAAO MSVll-J MEMORY DIAG. 
LOG ERROR ON BAD BANK 
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SEQ 0359 



12927 050672 








♦PER32: 


IF BADPC EQ *0 THEN JCALL BADSTACK 






050672 


005737 


002022 








TST 


BADPC 


050676 


001002 










BNE 


L470 


050700 


004737 


034152 








JSR 


PC. BADSTACK 


050704 










L470: 




12928 050704 


010137 


002034 






MOV Rl . ADDRESS 






12929 050710 


010037 


002052 






MOV RO.BAD 






12930 050714 


010237 


002044 






MOV R2.G00D 






12931 050720 










SET HEADER 






050720 


012737 


177777 


002612 






MOV 


«-l. HEADER 


12932 050726 


104040 








ERROR «40 




12933 050730 










SET HEADER 






050730 


012737 


177777 


002612 






MOV 


•-1. HEADER 


12934 050736 


000002 








RTI 




12935 
















12936 050740 








$PER33: 


IF BADPC EQ #0 THEN $CALL BADSTACK 






050740 


005737 


002022 








TST 


BADPC 


050744 


001002 










BNE 


L471 


050746 


004737 


034152 








JSR 


PC. BADSTACK 


050752 










L471. 


»§»»»» 




12937 050752 


010137 


002034 






MOV Rl, ADDRESS 






12938 050756 


010037 


002052 






MOV RO.BAD 






12939 050762 


105037 


002053 






CLRB BAOU 






12940 050766 


012737 


000377 


002044 




MOV #377, GOOD 






12941 050774 


004737 


050422 






CALL PERXOR 






12942 051000 










SET HEADER 






051000 


012737 


177777 


002612 






MOV 


0-1, HEADER 


12943 051006 


104041 








ERROR «41 




12944 051010 










SET HEADER 






051010 


012737 


177777 


002612 






MOV 


«-l. HEADER 


12945 051016 


000002 








RTI 




12946 
















12947 051020 








$PER34: 


IF BADPC EQ 00 THEN $CALL BADSTACK 






051020 


005737 


002022 








TST 


BADPC 


051024 


001002 










BNE 


L472 


051026 


004737 


034152 








JSR 


PC. BADSTACK 


051032 










L472: 






12948 051032 










IF #BIT15!BIT4 OFF. IN CSR 






051032 


032737 


100020 


002150 






BIT 


0BIT15!BIT4.CSR 


051040 


001002 










BNE 


L473 


12949 051042 


104016 








ERROR *16 ;N0 SBE OR OBE 






12950 051044 










ELSE 






051044 


000401 










BR L474 


051046 










L473: 




12951 051046 


104001 








ERROR ♦I ! EXPECTED SBE SO DBE 


MUST HAVE GOTTEN SET 


12952 051050 










END J OF IF #BIT15!BIT4 






051050 










L474: 






12953 051050 


000002 








RTI 







12954 
12955 

12956 051052 

12957 051056 
12956 051062 

12959 051070 

12960 051076 

12961 051100 

12962 051104 



i DURING BRANCH GOBBLE THE CONDITION CODES UERE URONG 

004737 050446 $PER35: CALL PERBNK 

004737 034152 CALL BADSTACK 

013737 002032 002052 MOV BADPSU.BAD 

012737 000012 002044 MOV #12. GOOD 

104047 ERROR ^47 

062706 000004 ADD #4.SP jFIX STACK FROM TRAP 

000207 RETURN ; ABORTING TEST 



CVMJAAO MSVll-J MEMORY OIAG. 
LOG ERROR ON BAD BANK 



12963 

12964 051106 

12965 051112 

12966 051116 
051116 

12967 051124 

12968 051126 
051126 

12969 051134 
12970 

12971 051136 

12972 051140 
12973 

12974 051142 

12975 051144 



010037 
010137 

012737 
104023 

012737 
000002 

104053 
000002 

104054 
000002 
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002044 
002052 

177777 002612 



177777 002612 



♦PER36: 



♦PER37: 



♦PER40: 



MOV 
MOV 
SET 

ERROR 
SET 

RTI 

ERROR 
RTI 

ERROR 
RTI 



RO.GOOD 

Rl.BAD 

HEADER 

♦23 

HEADER 



► 53 

► 54 



;ILC;iREV B 
:ILCi:REV B 

:ILC::REV B 
:ILCi;REV B 



SEQ 0360 



MOV #-1. HEADER 



MOV «-l. HEADER 



005237 056656 



CVMJAAO MSVll-J MEMORY DIAG. 
ROUTINE SCOPE HANDLER 



12978 
12979 
12960 
12981 
12982 
12983 
12984 
12985 
12986 

12987 051146 

12988 051152 
051152 

12989 051154 

12990 051160 

12991 051164 
051164 

12992 051164 

12993 051166 

12994 051172 

12995 051174 

12996 051200 

12997 051200 
12996 051204 

12999 051206 

13000 051214 

13001 051222 

13002 051224 

13011 051226 
051226 
051232 
051234 
051242 

13012 051244 

13013 051250 

13014 051254 
051254 

13015 051254 
051254 
051260 

13016 051262 

13017 051264 
051264 

13018 051264 
051264 
051272 
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SEQ 0361 



.SBTTL ROUTINE SCOPE HANDLER 



•THIS ROUTINE CONTROLS THE LOOPING OF SUBTESTS. IT UILL INCREMENT 
•AND LOAD THE DISPLAY DATA INTO THE DISPLAY REGISTER 
•THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 
•SU14xl LOOP ON TEST 

•SU9>1 LOOP ON ERROR 



•CALL 
* 

♦SCOPE: 



13019 
13020 051274 
13021 

13022 051276 

13023 051302 

13024 051310 

13025 051314 

13026 051320 

13027 051322 

13028 051326 

13029 051334 

13030 0S1S36 



002004 
005037 
105237 



104410 
005737 
001402 
004737 

005737 
001410 
013737 
032737 
001401 
104177 

005737 
001410 
032777 
001404 
005037 
000137 



005737 
001401 
000002 



032777 
001051 

000425 

013746 
012737 
005737 
012637 
000430 
062706 
022737 
001002 
00503"» 



SCOPE 

INC $DEVCT 
IF RESULT IS LT 



!SCOPE=I0T 

jTELL 



APi WE ARE ALIVE 



056656 
056660 



006216 
055152 
052314 



NOTRCE : 



177766 052312 
000001 052312 



002420 

000400 131374 

002420 
040604 



SKJ: 



CLR 
INCB 
END iOF 

CKSUR 
TST 
BEQ 
CALL 

rsT 

BEQ 
MOV 
BIT 
BEQ 
ERROR 

IF STOPOK IS TRUE AND 0SU8 SET. IN 9SUR 



*DEVCT 

♦UNIT 

IF RESULT 



TRACE 

NOTRCE 

CONTT 

CPERRF 

Six J 

a#177766.CPSAVE 
#BITO.CPSAVE 

SKJ 
► 177 



BGE L475 



;:TEST 



: TRACE 



L475:;i 

FOR CHANGE IN SOFT-SUR 



jIS THERE A CPU ERROR REGISTER? 
: BRANCH IF NOT 

5 GET CONTENTS OF ERROR REGISTER 
;IS THE POUER FAIL MONITOR BIT SET? 
: BRANCH IF NOT 
; REPORT IF SO 



CLR 
JMP 
END ;0F 



STOPOK 
EXIT 

IF STOPOK 



R-C 
R-C 
R-C 
R-C 
R-C 
R-C 
R-C 
TST STOPOK 
BEQ L476 
BIT #SU8.9SUR 
BEQ L476 



002440 



040000 131344 



000004 

051322 000004 

177060 

000004 

000004 

000005 004010 
177766 



IF NOSCOPE IS TRUE 



L476: 



RTI 
END ;0F 



TST NOSCOPE 
BEQ L477 



IF NOSCOPE 



1$: 



IF 0SU14 SET. IN SSUR THEN GOTO tOVER 



L477: 



;#<»##OSTART 
iXTSTR: BR 

MOV 
MOV 
TST 
MOV 
BR 

1$: ADD 
CMP 
BNE 
CLR 



BIT 
BNE 



ERRVEC.-(SP) 
«1* .ERRVEC 
177060 ssTIME 
(SP)*.ERRVEC 
♦SVLAD 
#4.SP 
05.PR0TYP 
6$ 

CPUERR 



OF CODE FOR THE XOR TESTER<»»*0* 

2i ;jIF RUNNING ON THE "XOR" TESTER CHANGE 

THIS INSTRUCTION TO A "NOP" (N0P«240) 
SAVE THE CONTENTS OF THE ERROR VECTOR 
SET FOR TIMEOUT 
OUT ON XOR? 
s; RESTORE THE ERROR VECTOR 
;;G0 TO THE NEXT TEST 
:FIX STACK FROM TRAP 
:IS THIS AN 11/83 ? 
: BRANCH IF NOT 
i RESET CPU ERROR REGISTER 



»SU14,SSUR 
♦OVER 



CVMJAAO MSVll-J MEMORY OIAG. 
ROUTINE SCOPE HANDLER 
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SEQ 0362 



13031 


051342 


012637 


000004 




61: 


MOV 


(SP)*,ERRVEC 


::REST0RE THE ERROR VECTOR 


13032 


051346 


000407 








BR 


4$ 


:;L00P ON THE PRESENT TEST 


13033 


051350 








2$::»««00ENO OF 


CODE FOR THE 


XOR TESIER^^OOO 


13034 


051350 


105737 


002014 




3$: 


TSTB 


lERFLG 


• 


HAS AN ERROR OCCURRED? 


13035 


0513S4 


001412 








BEQ 


ISVLAO 




BR IF NO 


13036 


051356 


032777 


001000 


131252 




BIT 


0SU9,aSUR 


V 


LOOP ON ERROR? 


13037 


051364 


001404 








BEQ 


5$ 




BR IF NO 


13038 


051366 


013737 


002624 


002622 


41: 


MOV 


♦LPERR.JLPADR 


• 


SET LOOP ADDRESS TO LAST SCOPE 


13039 


051374 


000410 








BR 


^OVER 






13040 


051376 


105037 


002014 




5»: 


CLRB 


*ERFLG 




ZERO THE ERROR FLAG 


13041 


051402 


011637 


002622 




ISVLAO: 


MOV 


(SP).*LPADR 




SAVE SCOPE LOOP ADDRESS 


13042 0S1406 


011637 


002624 






MOV 


(SP).»LPERR 




SAVE ERROR LOOP ADDRESS 


13043 


051412 


005037 


002362 






CLR 


♦ESCAPE 




CLEAR THE ESCAPE FROM ERROR ADDRESS 


13044 


051416 


004737 


051430 




lOVER: 


CALL 


GETDIS 






1304S 


051422 


013716 


002622 






MOV 


$LPADR.(SP) 


• 


FUDGE RETURN ADDRESS 


13046 


0S1426 


000002 








RTI 




; .FIXES PS 



CVMJAAO MSVU-J MEMOPY DIAG, 
ROUTINE SCOPE HANDLER 

13048 051430 



13049 
13050 
13051 

13052 
13053 
13054 
13055 
13059 
13060 
13061 

13062 



051430 
051436 
051444 
051444 
051446 
051452 
051454 
051462 
051462 
051470 
051476 
051476 
051500 



113737 
113737 

010046 
005737 
001403 
052737 

013777 
013737 

012600 
000207 
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002102 002013 
002300 002012 



002126 

100000 002012 

002012 131150 

002012 000174 



SEQ 0363 



GETOIS: SUBTST <<SUBR DISPLAY >> 
; •SUBTEST SUBR DISPLAY 



1$: 



MOVB 
MOVB 
PUSH 

TST 
BEQ 
BIS 

MOV 
MOV 
POP 

RETURN 



BANK,$BANK 
REALPAT , $PATMAR 
RO 

RLFLAG 
1) 

»BIT15.$PATMAR 

$PATMAR,aOISPLAY 

$PATMAR.DISPREG 

RO 



ARE UE RELOCATED? 
NO - SKIP 
YES - SET MSB 



MOV RO.-(SP) 



! SOFTWARE DISPLAY REGISTER 

MOV (SP)*.RO 



CVMJAAO MSVll-J MEMORY OIAG. 
ROUTINE ERROR HANDLER 



13065 
13066 
13067 
13068 
13069 
13070 
13071 
13072 
13073 
13074 
13075 
13076 
13077 
13078 
13079 
13080 
13081 
13082 
13083 
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SEQ 0364 



.S8TTL ROUTINE ERROR HANDuER 

*THIS ROUTINE UILL INCREMENT THE ERROR FLAG ANO THE ERROR COUNT, 
*SAVE THE ERROR ITEM NUI«ER ANO THE ADDRESS OF THE ERROR CALL 
*AN0 GO TO $ERRTYP ON ERROR 

•THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 

♦SU15-1 HALT ON ERROR 

*SU13-1 INHIBIT ERROR TYPEOUTS 

•SUlO-1 BELL ON ERROR 

•SU9-1 LOOP ON ERROR 

•CALL 

* ERROR N ::ERROR-EMT ANP N>ERROR ITEM NUMBER 



13084 
13085 
13086 
13087 
13088 
13089 
13090 
13091 
13092 



051502 
051506 
051510 
051514 
051520 
051520 
05i524 
051526 
051530 
051530 
051534 
051536 
051542 
051550 
051556 
051560 
051560 



13093 051564 
051564 



13094 
13095 

13096 
13097 

13098 

13099 
13100 
13101 
13102 
13103 
13104 
13105 
13106 
13107 
13108 
13109 
13110 
13111 
13112 



051570 
051574 
051574 
051576 
051604 
051604 
051604 
051604 
051604 
051610 
051616 
051622 
051630 

051636 
051644 
051646 
051652 
051654 
051660 
051662 
051670 











.ENABL 


LSB 




105737 


056666 




lERROR: 


TSTB 


♦ENV 


;ARE UE RUNNING IN APT MODE ? 


001402 








BEQ 


NOAPT 


:YES - DO UFD ABORT 


004737 


000000 






JSR 


PC. ABORT 


sGOTO UFD ABORT 


105037 


052310 




NOAPT : 


CLRB 


IBSAVE 


:R-C 










IF NOERROR IS FALSE 




005737 


002430 










TST NOERROR 


001027 












BNE L500 


104410 








CKSUR 




::TEST FOR CHANGE IN SOFT SUR 






BACK: 






■R C 


105237 
001775 


002014 




11: 


INCB 


JERFLG 


s:SET THE ERROR FLAG 








BEQ 


1$ 


::00N'T LET THE FLAG GO TO ZERO 


004737 


051430 






CALL 


GETDIS 


! SETUP DISPLAY STUFF 


013737 


002012 


056652 




MOV 


|PATMAR.$TESTN 


.•FOR APT 


032777 


002000 


131060 




BIT 


0SU1O.9SUR 


: :BELL ON ERROR? 


001404 








BEQ 
TYPE 


2$ 

$BELL 


;:N0 SKIP 
::RING BELL 


104401 


002653 






TYPEIT 


.IBELL 










.OSABL 
TYPE 


CRF 

MSG014 


i CONTROL Z 


104401 


066060 






TYPEIT 


.MSG014 










.OSABL 


CRF 




005237 


002630 




21: 


INC 


lERTTL 


COUNT THE NUMBER OF ERRORS 








IF RESULT IS MI 




100003 












BPL LSOl 


012737 


077777 


002630 




MOV 


«77777.$ERTTL 










END sOF IF RESULT 


























END iOF 


IF NOERROR 














L500:s.:s:: 

:;GET ADDRESS OF ERROR INSTRUCTION 


011637 


002020 






MOV 


(SP).ERRPC 


162737 


000002 


002020 




SUB 


02, ERRPC 




010637 


002024 






MOV 


SP.ERRSP 




016637 


000002 


002030 




MOV 


2(SP).ERRPSU 


Si STRIP AND SAVE THE ERROR ITEM CODE 


117737 


130164 


002015 




MOVB 


9ERRPC.$ITEMB 



122737 
001431 
105737 
001024 
005737 
001423 
013737 
032737 



000177 002015 
052310 



052314 

177766 
000001 



052312 
052312 



CMPB #177.$ITEMB 

BEQ 1001$ 

TSTB IBSAVE 

BNE 1000$ 

TST CPERRF 

BEQ 1001$ 

MOV 177766. CPSAVE 

BIT *BITO. CPSAVE 



IS THIS THE POWER FAIL CALL? 
BRANCH IF SO 
2ND ERROR CALL? 
BRANCH IF SO 

IS THERE A CPU ERROR REGISTER? 

BRANCH IF NOT 

SAVE CONTENTS 

POWER MONITOR BIT SET? 



jR-C 
sR-C 
:R C 
sR-C 
iR-C 
:R-C 
jR-C 
iR-C 



CVMJAAO MSVll-J MEMORY OIAG. 
ROUTINE ERROR HANDLER 



13113 
13114 
13115 
13116 
13117 
13118 
13119 
13120 



13121 



13122 
13123 
13124 
13125 
13126 
13127 

13128 
13129 
13130 



13131 
13132 

13133 



13134 

13135 

13136 

13137 
13138 



13139 
13140 
13141 



051676 

051700 

051706 

051714 

051722 

051724 

051730 

051730 

051730 

051734 

051736 

051736 

051742 

051744 

051752 

051760 

051766 

051774 

052000 

052000 

052000 

052006 

052012 

052012 

052020 

052022 

052024 

052024 

052024 

052024 

052032 

052034 

052040 

052042 

052042 

052044 

052044 

052044 

052044 

052044 

052050 

052050 

052054 

052056 

052062 

052064 

052064 



001414 
042737 
112737 
112737 
000402 
105037 



005737 
001043 

005737 
001416 
013737 
162737 
013737 
013737 
005037 



013737 
004737 

032777 
001401 
000420 



032777 
001404 
005737 
001401 

000410 



004737 

005737 
001403 
013706 
000207 



000001 
002015 
000177 

052310 



002430 



002022 

002022 
000002 
002026 
002032 
002022 



002020 
050446 

020000 



000040 
002406 



052316 
002276 
002274 
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SEQ 0365 



177766 
052310 
002015 



1000$ : 
1001 ^ 



002020 
002020 
002024 
002030 



056650 
130616 

130604 



BEQ 1001$ 

BIC #BIT0. 177766 

Move ITEMS. IBSAVE 

MOVB *177.$ITEMB 

BR 1001$ 

CLRB IBSAVE 

IF NOERROR IS FALSE 



IF BAOPC NE «0 



MOV BAOPC. ERRPC 
SUB 02. ERRPC 
MOV BAOSP.ERRSP 
MOV BAOPSU.ERRPSU 
CLR BAOPC 
END ;IF 

MOV ERRPC. IFATAL 

CALL PERBNK 

IF «SU13 SET. IN 9SUR 



BRANCH IF NOT 
CLEAR THE BIT 

MAKE IBSAVE NON-ZERO FOR DUAL CALL 
SET $ITEMB TO POUER FAIL POINTER 



R-C 
R-C 
R-C 
R-C 
R-C 
R-C 
R-C 



TST NOERROR 
BNE L502 

TST BADPC 
BEQ L503 



■FOR APT 

!;LOG ERROR ON BANK 



LS03: 



BR 3$ 
END sOF IF 9SU13 

IF «SU5 SET. IN aSUR AND TOOMANY IS TRUE 



GOTO 3* 
END sOF IF 0SU5 
END :0F IF NOERROR 



BIT »SU13.9SUR 
BEQ L50A 



L504: 



BIT »SU5.9SUR 
BEQ L505 
TST TOOMANY 
BEQ L50S 

BR Zi 



L505: 



CALL JERRTYP 
IF MONFLG IS TRUE 



END 



MOV 
RTS 



SAVMON.SP 
PC 



L502: :::::: 

Si GO TO USER ERROR ROUTINE 

;;SH0ULD UE RETURN TO XXDP MONITOR??? 

TST MONFLG 
BEQ L506 

GET MONITOR ADDRESS 
GO TO MONITOR 



L506: 



CVMJAAO MSVll-J MEMORY DIAG. 
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SEQ 0366 



13143 052064 










052064 


005737 


002430 






052070 


001072 






13144 


052072 


005777 


130540 




13145 052076 


100002 






13146 


052100 


000000 






13147 


052102 


104410 






13140 052104 










052104 


005737 


002440 






052110 


001006 








052112 


032777 


001000 


130516 




052120 


001402 






13149 


052122 


013716 


002624 




13150 


052126 










052126 








13151 


052126 


005737 


002362 




13152 052132 


001402 






13153 052134 


013716 


002362 




13154 052140 










052140 


005737 


002220 






052144 


001043 






13155 


052146 


022737 


000005 


004010 


13156 052154 


001002 






13157 


052156 


005037 


177766 




13150 


052162 










052162 


005737 


002350 






052166 


001006 








052170 


005737 


002352 






052174 


001003 








052176 


005737 


002064 






052202 


001405 








052204 








13159 


052204 


012737 


000001 


056646 


13160 


052212 


000137 


040604 




13161 


052216 










052216 








13162 


052216 




002354 






052216 


005737 






052222 


001414 








052224 


023727 


002630 


000020 




052232 


101410 






13163 


0"52234 










052234 


104401 


070051 




13164 


052240 


013700 


000042 




13165 052244 


005037 


000042 




13166 


052250 


000137 


014022 




13167 


052254 










052254 








13168 


052254 










052254 








13169 


052254 










052254 


000403 








052256 








13170 


052256 










052256 


012737 


mm 


002612 


13171 


052264 









3*: 

IHALT: 
71: 



IF NOERROR IS FALSE 



9^ 



TST 
BPL 
HALT 
CKSUR 



asuR 

7$ 



HALT ON ERROR 

SKIP IF CONTINUE 

HALT ON ERROR! 

TEST FOR CHANGE IN SOFT SUR 



IF NOSCOPE IS FALSE AND #SU9 SET. IN 9SUR 



MOV iLPERR.CSP) 
END sOF IF NOSCOPE 

TST $ESCAPE 
BEQ 9i 

MOV $ESCAPE.(SP) 
IF DETFLAG IS FALSE 



: FUDGE RETURN FOR LOOPING 



TST NOERROR 
BNE L507 



TST NOSCOPE 
BNE L510 
BIT «SU9.aSUR 
BEQ L510 



L510:::;;i 
; CHECK FOR AN ESCAPE ADDRESS 
:BR IF NONE 

i FUDGE RETURN ADDRESS FOR ESCAPE 



TST DETFLAG 
BNE L511 

CMP #5.PR0TYP :IS THIS AN 11/83 ? 

BNE 11$ 
CLR CPUERR 

11$: IF ACTFLAG IS TRUE OR APTFLAG IS TRUE OR FATAL* IS TRUE 

TST ACTFLAG 
BNE L512 
TST APTFLAG 
BNE L512 
TST FATAL$ 
BEQ L513 



MOV #1.»MSGTY 
JMP EXIT 
END ;0F IF ACTFLAG 



;F0R APT 



L512: 



IF XXDPCHAIN IS TRUE AND JERTTL HI #20 



L513: 



TYPE MSG066 
TYPEIT ,MSG066 
.DSABL CRF 

MOV 42. RO 

CLR 42 

JMP *ZAP42 
END ;0F IF XXDPCHAIN 

END :0F iF DETFLAG 

ELSE 

SET HEADER 
END :0F IF NOERROR 



TST XXDPCHAIN 
BEQ L514 
CMP ♦ERTTL,020 
BLOS L514 

: ERROR COUNT EXCEEDED 20 - ABORTING FOR XXDP CHAIN 



L514: 
L511:i 



L507: 



BR L515 

MOV 4-1, HEADER 



CVIJAAO MSVll-J MEMORY OIAG. 
ROUTINE ERROR HANDLER 
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13172 



13173 
13174 
13175 
13176 
13177 
13178 
13179 
1^180 



052264 
052264 
052264 
052270 
052274 
052300 
052302 
052306 
052310 
052312 
052314 



005037 002406 
005037 002430 
105737 052310 
001402 

000137 051530 

000002 

000000 

000000 

000000 



101: 



213$: 
IBSAVE 
CPSAVE 
CPERRF 



CLEAR TOOHANY . NOERRQR 



L515: 



TSTB 

BEQ 

JMP 

RTI 

.UORO 

.WORD 

.UORO 

.OSABL 



IBSAVE 

213$ 

BACK 



:: RETURN 



;P0UER FAIL ERROR CALL? 
jJUMP IF SO 



SEQ 036'' 



LSB 



CLR 
CLR 

:R C 
iR-C 
;R-C 

sR-C 
:R C 
:R-C 



TOOMANY 
NOERRCW 



F13 



Ct/MJAAO MSVll-J MEMORY DIA6. 
ROUTINE ERROR MESSAGE TYPEOUT 

13183 
13184 
13185 
13186 
13187 
13188 
13189 
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.SBTTL ROUTINE ERROR MESSAGE TYPEOUT 

; ******************************************************************************* 

J ♦THIS ROUTINE USES THE "ITEM CONTROL BYTE" ($ITEMB) TO DETERMINE WHICH 

J •ERROR IS TO BE REPORTED. IT THEN OBTAINS. FROM THE 'ERROR TABLE" (♦ERRTB). 

:*AND REPORTS THE APPROPRIATE INFORMATION CONCERNING THE ERROR. 



"CARRIAGE RETURN" £ "LINE FEED' 



SEQ 0368 



13190 


052316 


104415 




*ERRTYP 


: SAVREG 




13191 


052320 








TYPE 


$CRLF 




052320 


104401 


002660 




TYPEIT 


. $CRLF 












.DSABL 


CRF 


13192 


052324 


005000 






CLR 


RO 


13193 


052326 


153700 


002015 




BISB 


$ITE'1B,R0 


13194 


052332 


001004 






BNE 


1$ 


13195 














13196 


052334 








TVPOCT 


ERRPC , <ERROR 




052334 


013746 


002020 




MOV 


ERRPC , - ( SP ) 




052340 


104402 






TYPOC 














.DSABL 


CRF 


13197 


052342 


000511 






BR 


11$ 


13198 


052344 


122700 


AAA • 

000177 


1» : 


CMPB 


A 1 OA 

<rl77 ,H0 


13199 


052350 


001003 






BNc 


< AA t 

100$ 


13200 


052352 


012700 


052626 




nuv 


JiOCCPIIC DA 


13201 


052356 


000406 






on 

BR 


110$ 


13202 


052360 


A/\P V A A 

005300 




% A A t 

100$ : 


DEC 


n A 

RO 


13203 052362 


006300 






ltd 

ASL 


n A 

RO 


13204 


052364 


AA^ 9AA 

006300 






ASL 


n A 

RO 


13205 


052366 


f\f\r 9AA 

006300 






ASL 


DA 


13206 


052370 


062700 


057274 




ADD 


AAPDDTD DA 

fr$cRRTB|KO 


13207 


052374 


012037 


052432 


110$ : 


MOV 


f DA ^ t t 

CROJ* ,3$ 


13208 


052400 


AA 4 il t ^ 

001417 






DtQ 


H$ 


13209 


052402 


005737 


002430 




TCT 


NUtRRUK 


13210 


052406 


001003 






BNE 


12$ 


13211 


052410 


005737 


002612 




TST 


HEADER 


13212 


052414 


i AAA 4 4 

100011 






DDI 

BrL 




13213 


052416 


005737 


002064 


12$ : 


TCT 


C A TAI i 


13214 


052422 


001402 






BEQ 


a* 


13215 


052424 








T vnc 
T TKt 


MCP A£.7 


052424 


104401 


070120 




T vnCTT 
T TKtl 1 


, nbbOo f 








nc ADI 


LRr 


13216 


052430 






2$ : 


T VOC 

1 Trt 






052430 


• A A A A • 

104401 






T VDCTT 












nc ADI 




13217 


052432 


000000 




3$: 


.UORD 


0 


13218 


052434 








TYPE 


$CRLF 




052434 


104401 


002660 




TYPEIT 


.$CRLF 












.DSABL 


CRF 


13219 


052440 


012037 


052464 


4$: 


MOV 


(R0)*.5$ 


13220 052444 


001412 






BEQ 


6$ 


13221 


052446 


005737 


002430 




TST 


NOERROR 


13222 052452 


001003 






BNE 


13$ 


13223 052454 


005737 


002612 




TST 


HEADER 


13224 


052460 


100004 






BPL 


6$ 


13225 052462 






13$: 


TYPE 






052462 


104401 






TYPEIT 














. DSABL 


CRF 



s; PICKUP THE ITEM INDEX 

j;IF ITEM NUMBER IS ZERO. JUST 
Si TYPE THE PC OF THE ERROR 
ADDRESS) 

iSAVE ERRPC FOR TYPEOUT 
; ERROR ADDRESS 

;G0 TYPE-OCTAL ASCIKALL DIGITS) 
:sGET OUT 

; POWER MONITOR CALL? 
i BRANCH IF NOT 

:MOV ADDRESS OF PFE BIT ERROR TO RO 

s; AO JUST THE INDEX SO THAT IT WILL 
; i WORK FOR THE ERROR TABLE 



FORM TABLE POINTER 

PICKUP "ERROR MESSAGE" POINTER 

SKIP TYPEOUT IF NO POINTER 

IS THIS REALLY AN ERROR? 

YES - SKIP 

TYPE HEADER? 

NO - SKIP 

WAS IT A FATAL ERROR? 

NO SKIP 

FATAL 



SiTYPE THE "ERROR MESSAGE" 



;; "ERROR MESSAGE" POINTER GOES HERE 
:s "CARRIAGE RETURN" t "LINE FEED" 



J PICKUP "DATA HEADER" POINTER 

iSKIP TYPEOUT IF 0 

IS THIS REALLY AN ERROR? 

YES - SKIP 

TYPE HEADER? 

NO - SKIP 

{TYPE THE "DATA HEADER" 



R-C 
R-C 
R-C 
R-C 
R-C 



jR-C 



CVMJAAO MSVll-J f€MOfiY OIAG. 
ROUTINE ERROR MESSAGE TYPEOUT 



13226 052464 

13227 052466 
052466 



000000 

104401 002.60 



13228 052472 012001 

13229 052474 001427 

13230 052476 012002 
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51: 



61: 



.UORD 

TYPE 

TYPEIT 

.DSABL 

MOV 

BEQ 

MOV 



0 

*CRLF 
. *CRLF 
CRF 

(R0)«,R1 
10$ 

(R0)«.R2 



SEQ 0369 



J ; "DATA HEADER" POINTER GOES HERE 
:! "CARRIAGE RETURN" £ "LINE FEED" 



! PICKUP "DATA TABLE" POINTER 
:BR IF NO DATA TO BE TYPED 
; PICKUP "DATA FORMAT" POINTER 



cvrijAAo risvii-j memory diag, 

ROUTINE ERROR MESSAGE TYPEOUT 



H13 
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SEQ 0370 



13c 30 VjCJW 








74 • 


HOVR 
nwwD 


lOcOH \JJCJ\JC 










ASl 






05251 2 






TAl 1 












RR 
on 




052736 








TAG704 




052746 








1 'XT 




052756 








TAG724 




053026 








TAG73$ 




053066 








TAG74$ 




053 1 00 








TAG75$ 




0531 12 

V^v^X Xfc 








TAG76$ 


13244 0S2S30 


053156 








TAG77$ 












TAG78$ 


0SPS34 










TAG79$ 




062701 

VWK • WX 


000002 




9i : 


ADD 


13252 052542 


005711 

> X X 








TST 


13253 052544 


001403 








BEQ 












TYPE 


052546 


104401 

X vx 


066107 






TYPEIT 












. DSABL 


05P55P 


000752 








BR 


13256 












13257 052554 


005737 


002110 




10$ : 


TST 


13258 052560 


001402 








BEQ 


13259 052562 


005237 


002612 






INC 


13260 052566 


104416 






11$ : 


RESREG 


13261 052570 










IF #SU7 


052570 


032777 


000200 


130040 






052576 


001410 










052600 


005737 


002220 








052604 


001005 










052606 


005737 


002430 








052612 


001002 








CALL 


13262 052614 


004737 


053266 






MPfe? 052620 










END ;0F 


052620 










TYPE 


13264 052620 










052620 


104401 


070557 






TYPEIT 
.DSABL 


13265 052624 


000207 








RETURN 












.EVEN 


13267 052626 


052636 


052672 


052722 


PFECUS: 


.UORO 


052634 


052732 

V^b > Wb 








.ASCIZ 


13268 052636 


120 


117 


127 


PFECEM: 


052641 


105 

X 


122 


040 






052644 


115 

X X ^ 


117 


116 






052647 


111 


124 


117 






052652 


122 

Xbb 


040 


102 






052655 


111 

XXX 


124 


040 






052660 


106 


117 


125 






052663 


116 


104 


040 






052666 


123 


105 


124 






0526 /I 


000 










13269 052672 


124 


105 


123 


PFECDH: 


.ASCIZ 


052675 


124 


116 


117 






052700 


040 


040 


105 






052703 


122 


122 


040 







.R3 



(R2) 
R3 
98$(R3) 
9$ 



:MAKE IT A UORD ADDRESS 



92, Rl 

(Rl) 

10$ 

MSG018 
.MSG018 
CRF 
7$ 

MUT 
11$ 

HEADER 



UPDATE DATA TABLE POINTER 
;IS THERE ANOTHER NUMBER? 
iBR IF NO 
TYPE 2 SPACES 



;;LOOP 

IS THERE A MEMORY UNDER TEST 
NO - SKIP 

YES BUMP HFADER FLAG 



DETAIL 



MSG104 

.MSG104 

CRF 



BIT ffSU7.9SUR 
BEQ L516 
TST DETFLAG 
BNE L516 
TST NOERROR 
BNE L516 



: CONTROL Z 



L516:; 



PFECEM . PFECDH , PFECDT . PFECDF 
"POWER MONITOR BIT FOUND SET' 



sR-C 
:R C 

jR-C 



.ASCIZ "TESTNO ERR PC CPUERR' 



;R C 



113 
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052706 


120 


103 


040 


052711 


040 


103 


120 


052714 


125 


105 


122 


052717 


122 


000 





13270 .EVEN 

13271 052722 056652 002020 052312 PFECDT: .WORD *TESTN.ERRPC,CPSAVE.0 
052730 000000 

13272 052732 000 000 000 PFECDF: .BYTE 0.0.0.0 
052735 000 

13273 



SEQ 0571 



;R-C 
;R-C 

:R-C 



i 



CVMJAAO MSVU-J MEMORY OIAG. 
ROUTINE ERROR MESSAGE TYPEOUT 



13276 
13277 
13278 

13279 052736 
052736 
052742 



13280 052744 

13281 

13282 

13283 

13284 

13285 052746 
052746 
052752 



017146 
104402 

000207 



017146 
104405 



000000 



000000 



13286 
13287 
13288 
13289 
13290 
13291 



13292 
13293 
11294 

13295 



052754 000207 



052756 
052756 
052760 
052762 
052766 
052772 
052772 
053000 
053000 



13296 053004 

13297 053010 

13298 053014 
053014 
053016 

13299 053020 
053020 



010146 
010546 
013701 
070127 

012737 

104401 

004737 
005037 

012605 
012601 



002102 
000004 

177777 

066060 

033404 
002372 



104401 066060 
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;*♦♦ OCTAL ♦*♦ 



SCO 0372 



TAG70*: TYPOCT a(Rl) 

MOV 8(R1).-(SP) 
TYPOC 

.OSABL CRF 
RETURN 



TYPE AN OCTAL WJMBER 
SAVE a(Rl) FOR TYPEOUT 
60 TYPE-OCTAL ASCIKALL DIGITS) 



DECIMAL *** 



TAG71$: TYPDEC a(Rl) 

MOV a(Rl).-(SP) 
TYPDS 

.DSABL CRF 
RETURN 



TYPE A DECIMAL NUMBER 
SAVE a(Rl) FOR TYPEOUT 
GO TYPE—DECIMAL ASCII UITH SIGN 



;*** INTERLEAVE *** 
TAG72$: PUSH R1,R5 



002372 



MOV 
MUL 
SET 



BANK.Rl 
#4.R1 
NOT AS 



13300 053024 


000207 




13301 






13302 






13303 






13304 






13305 053026 






053026 


010146 




053030 


010546 




13306 053032 


013701 


002102 


13307 053036 


070127 


000004 


13308 053042 






053042 


012737 


177777 002372 


13309 053050 


004737 


033600 


13310 053054 


005037 


002372 


13311 053060 






053060 


012605 




053062 


012601 




13312 053064 


000207 





TYPE MSG014 

TYPEIT .MSG014 

.OSABL CRF 

CALL TCFIGl 

CLR NOTAB 

POP R5.R1 



TYPE MSG014 

TYPEIT .MS6014 

.DSABL CRF 
RETURN 



MOV Rl.-(SP) 
MOV R5.-(SP) 



{INDICATE NO TABLE TO BE PRINTED - NOU 

MOV 0 1. NOTAB 



;1 SPACE 



MOV (SP)*.R5 
MOV (SP)*.R1 



;*** CSR *** 

TAG73$- PUSH R1.R5 

MOV Rl.-(SP) 
MOV R5.-(SP) 

MOV BANK.Rl 
MUL #4,R1 
SET NOTAB 

MOV «-l. NOTAB 

CALL TCFIG3 
CLR NOTAB 
POP R5.R1 

MOV (SP)*.R5 
MOV (SP)».R1 

RETURN 



CVMJAAO MSVll-J MEMORY DIAG. 
ROUTINE ERROR MESSAGE TYPEOUT 



13313 
13314 
13315 
13316 

13317 053066 
053066 



013746 002300 



053072 104403 

053074 002 

053075 001 

13318 053076 000207 

13319 

13320 

13321 

13322 

13323 053100 

053100 013746 002102 

053104 104403 



053106 
053107 



003 
000 



13324 053110 000207 
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SCO 0373 



: ******************************************************************************* 
,*** PATTERN ♦♦♦ 

;********************************************************************* ***t ****** 

TA674I: TYPOCS REALPAT . <TYPE (0-77)>.2.Z 



MOV 



REALPAT, -(SP) 



TYPOS 
.BYTE 2 
.BYTE 1 
.DSABL CRF 
RETURN 



SAVE REALPAT FOR TYPEOUT 
TYPE (0-77) 
GO TYPE-OCTAL ASCII 
TYPE 2 OIGIT(S) 
TYPE LEADING ZEROS 



; ******************************************************************************* 

;*** BANK *** 

; ******************************************************************************* 

TAG75*: TYPOCS BANK.<TYPE (0-176)>,3 



MOV 



BANK,-(SP) 



TYPOS 
.BYTE 3 
.BYTE 0 
.OSABL CRF 
RETURN 



SAVE BANK FOR TYPEOUT 
TYPE (0-176) 
GO TYPE-OCTAL ASCII 
TYPE 3 DIGIT(S) 
SUPPRESS LEADING ZEROS 



CVMJAAO MSVll-J MEMWY DIAG, 
ROUTINE ERROR MESSAGE 7YPE0U7 

13326 
13327 
13320 
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MTYPE *** 

; ********************************************************************** ft^tttt* 



13329 


053112 
053112 


010146 




TAG76*: PUSH 


R1.R5 


MOV Rl.-(SP) 




053114 


010546 








MOV R5.-(SP) 


13330 


053116 


013701 


002102 


MOV 


BANK.Rl 


13331 


053122 


070127 


000004 


MUL 


#4.R1 




13332 


053126 






SET 


NOTAB 






053126 


012737 


177777 002372 






MOV 0-1. NOTAB 


13333 


053134 






TYPE 


MSG019 




053134 


104401 


066112 


TYPEIT 
.OSABL 


,MSG019 
CRF 




13334 


053140 


004737 


033444 


CALL 


TCFIG2 




13335 


053144 


005037 


002372 


CLR 


NOTAB 




13336 


053150 






POP 


R5.R1 






053150 


012605 






MOV (SP)«.R5 




053152 


012601 








MOV (SP)».R1 


13337 


053154 


000207 




RETURN 






13338 














13339 








•********************************************************************t********** 


13340 








;*** UNKNOUN DATA *** 




13341 








• ******************************************************************************* 


13342 


053156 






TAG77*: TYPE 


MSG061 






053156 


104401 


067767 


TYPEIT 


,MSG061 





13343 
13344 
13345 
13346 
13347 
13348 
13349 
13350 
13351 
13352 
13353 
13354 
13355 
13356 
13357 



053162 000207 



053164 
053172 
053200 
053206 
053212 
053214 
053222 
053226 
053232 
053236 
053236 



013737 
162737 
013737 
006237 
103003 
052737 
012746 
004737 
062706 



002034 
060000 
002102 
002042 

100000 
002040 
056526 
000002 



.OSABL CRF 
RETURN 

; ******************************************************************************* 

i*** PHYSICAL ADDRESS *** 

■ ******************************************************************************* 

002040 TAG78$: MOV ADDRESS , PHY ADD 



002040 
002042 



002040 



1$: 



13358 053242 

13359 

13360 

13361 

13362 

13363 053244 
0S3244 

13364 0S32S0 
053250 

053254 
053256 
053257 



104401 056634 
000207 



SUB OFIRST.PHYADD 

MOV BANK, PHY ADD* 2 

ASR PHYADD*2 

BCC 1* 

BIS 0BIT15.PHYADD 

MOV #PHYADD.-(SP) 

CALL $DB20 

ADD *2.SP 

TYPE $0CT8 



SEQ 0374 



POINTER TO DOUBLE UORD ON STACK 

CALL DOUBLE PRECISION CONVERSION ROUTINE 

FIX STACK 



104401 

017146 

104403 
003 
001 



066107 
000000 



TYPEIT .$0CT8 
.OSABL CRF 
RETURN 

; ******************************************************************************* 

;*** OCTAL BYTE *** 

; ******************************************************************************* 

TAG79*: TYPE MSG018 ;2 SPACES 

TYPEIT ,MSG018 

.DSABL CRF 

TYPOCS a(Rl).<TYPE BYTE>.3.Z 



MOV 

TYPOS 
.BYTE 
.BYTE 



a(Rl).-(SP) 



3 
1 



SAVE a(Rl) FOR TYPEOUT 
TYPE BYTE 

GO TYPE-OCTAL ASCII 
TYPE 3 DIGIT(S) 
TYPE LEADING ZEROS 



M13 
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ROUTINE ERROR MESSAGE TfPEOUT 

.0SA8L CRF 

13365 053260 TYPE MSG014 ; SPACE 
053260 104401 066060 TYPEIT .MSG014 

.OSABL CRF 

13366 053264 000207 RETURN 



cvnjAAO Msvn-j memory oiag. 

ROUTINE ERROR MESSAGE TYPEOUT 



1 3410 












053266 

W 


005237 


002220 




1 341? 


053272 


022737 


000003 


002220 


13413 


053300 


101473 






11414 


053302 


022737 


000002 


002220 


13415 


053310 


001435 






13416 


053312 










053312 


013746 


002612 






053316 


013746 


002110 




13417 


053322 










053322 


012737 


177777 


002612 


13418 


053330 


005037 


002110 




13419 053334 


010037 


002200 




13420 053340 


012700 


002202 




13421 


053344 


010120 






13422 


053346 


010220 






13423 


053350 


010320 






13424 


053352 


010420 






13425 053354 


010520 






13426 


053356 


013720 


002024 




13427 


053362 


013720 


002030 




13428 


053366 


013700 


002200 




13429 


053372 










053372 


012737 


177777 


002430 


13430 


053400 


104013 






13431 


053402 


000423 






13432 


053404 








053404 


013746 


002612 






053410 


013746 


002110 




13433 


053414 








053414 


012737 


177777 


002612 


13434 


053422 


005037 


002110 




13435 


053426 






002430 




053426 


012737 


177777 


13436 


053434 


104031 






13437 


053436 


022737 


000005 


004010 


13438 


053444 


001002 






13439 


053446 


005037 


177766 




13440 


053452 










053452 


012637 


002110 






053456 


012637 


002612 




13441 










13442 


053462 


004737 


053266 




13443 


0'53466 


000207 
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DETAIL: SUBTST <<SUBR DETAILED ERROR REPORT >> 
tttt*********************************************************^** *************** 



SCQ 0376 



•SUBTEST 



DETAILED ERROR REPORT 



2i: 



INC DETFLAG 

CMP #3. DETFLAG 

BLOS 4$ 

CMP 02, DETFLAG 

BEQ 21 

PUSH HEADER.MUT 



SET HEADER 

CLR MUT 

MOV RO.DETRO 

MOV ODETRl.RO 

MOV R1,{R0)« 

MOV R2.(R0)» 

MOV R3,(R0)* 

MOV R4.(R0>* 

MOV RS,(RO)t 

MOV ERRSP.(RO)t 

MOV ERRPSU.(RO)t 

MOV OETRO.RO 

SET NOERROR 

ERROR *13 

BR II 

PUSH HEADER.MUT 



SET HEADER 

CLR MUT 

SET NOERROR 

ERROR *31 

CMP ffS.PROTYP 

BNE II 

CLR CPUERR 

POP MUT. HEADER 



iUARNir^ RECURSIVE 
CALL DETAIL 
RETURN 



MOV HEADER.-(SP) 
MOV MUT.-(SP) 

MOV 0-1. HEADER 



jIS THIS AN 11/83 ? 



MOV 0-1, NOERROR 



MOV HEADER. -(SP) 
MOV MUT.-(SP) 

MOV 0-1. HEADER 



MOV 0-1. NOERROR 



MOV {SP)«.MUT 
MOV (SP)». HEADER 



cvnjAAo nsvii-j meiory oiag. 

SU6R DETAILED ERROR REPORT 



13446 






15447 053470 


004737 


055152 


13446 












13450 053474 






053474 


013746 


002150 








053504 


010146 




13451 053506 






053506 


104401 


067745 


13452 053512 






053512 


104401 


002660 


13453 053516 


013701 


002224 


13454 053522 






053522 






13455 053522 






053522 


005037 


002152 


053526 












13457 053530 






053530 


103006 










13459 053534 






053534 


013746 


002150 


053540 


104402 




13460 053542 






053542 


104401 


066107 


13461 053546 






053546 






13462 053546 






053546 


005701 




C53550 


001407 




13463 053552 






053552 


062737 


000002 


053560 


023727 


002152 


053566 


003757 




053570 






13464 053570 






053570 






13465 053570 






053570 


012601 




053572 


012637 


002152 


053576 


012637 


002150 








13467 






13468 053602 






053602 


010046 




053604 


010146 




13469 053606 






053606 


104401 


070336 


13470 053612 


013701 


002574 


13471 053616 


162701 


000002 
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; SIMULATE CONTROL "T" 

CALL CONTT {DISPLAY "DISPLAY" INFO 

:TYPE CONTENTS Of ALL CSR'S 
PUSH CSR.CSRNO.Rl 

MOV CSR.-(SP) 
MOV CSRNO.-(SP) 
HOV R1.-<SP) 

TYPE MS6058 
TYPEIT .MS6058 
•OSABL CRF 
TYPE ICRLF 
TYPEIT . »CRLF 
•DSABL CRF 
MOV TOTCSRS.Rl 
BEGIN DUMPCSRLOOP 

6103: :::::: 

FOR CSRNO 00 TO 036 BY 92 

CLR CSRNO 
6104::::::: 

ASL Rl 
ON. ERROR 

6CC L517 

READCSR 

TYPOCT CSR 
MOV CSR,-(SP) ::SAVE CSR FOR TYPEOUT 

TYPOC ::G0 TYPE-OCTAL ASCIKALL DIGITS) 

.DSA6L CRF 

TYPE MSG018 52 SPACES 

TYPEIT .MSG018 
.DSA6L CRF 

END :0F ON. ERROR 

IF Rl EQ *0 THEN LEAVE DUMPCSRLOOP ' ' 

TST Rl 
BEQ E103 

END :0F FOR CSRNO 

ADD «2. CSRNO 
CMP CSRNO. *36 
eLE B104 
E104 :::;:::: 

END DUMPCSRLOOP 

E103: :::::: 

POP Rl, CSRNO. CSR 

MOV (SP)».R1 
MOV (SP)*, CSRNO 
MOV (SP)*.CSR 

:TYPE STACKS 
PUSH RO.Rl 

MOV RO.-(SP) 
MOV Rl.-(SP) 

TYPE MSG088 : KERNEL STACK 

TYPEIT .MSG088 

.OSABL CRF 

MOV KSTACK.Rl 

SUB #2.R1 



SEQ 0377 



C14 



CVMJAAO MSVll-J MEMORY 01 AG. 
Suen DETAILED ERROR REPORT 



13472 


053622 








053622 


010600 












13473 


053624 








053624 


104401 


002660 


13474 


053630 








053630 


010046 






053632 


104402 




13475 


053634 








053634 


104401 


066107 


13476 053640 








053640 


011046 






053642 


104402 




13477 


053644 








053644 


062700 


000002 




AC V£ C A 

053650 


020001 






053652 


003764 






053654 






13478 








13479 


053654 


005737 


002456 


13480 


053660 


001036 




13481 


053662 


042737 


030000 


13482 


053670 


052737 


010000 


13483 


053676 


006506 




13484 


053700 








053700 


012601 






053702 


012600 




13485 


053704 








053704 


104401 


070354 


13486 


053710 








053710 


020027 


000740 




053714 


002016 




13487 


053716 








053716 






13488 


053716 








053716 


104401 


002660 


13489 053722 








053722 


010046 






053724 


104402 




13490 


053726 








053726 


104401 


066107 


13491 


053732 








053732 


011046 






053734 


104402 




13492 053736 








053736 


062700 


000002 




053742 


020027 


000736 




053746 


003763 
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FOR RO :- SP TO Rl BY »2 



TYPE JCRLF 
TYPEIT .$CRLF 
.DSABL CRF 

TYPOCT RO 
MOV RO.-(SP) 
TYPOC 

.DSABL CRF 

TYPE MSG018 
TYPEIT .MSG018 
.DSABL CRF 

TYPOCT (RO) 
MOV (RO),-(SP) 
TYPOC 

.DSABL CRF 
END ;0F FOR RO 



177776 
177776 



MOV SP.RO 
B105: ;;»;;: 



:SAVE RO FOR TYPEOUT 

:G0 TYPE--OCTAL ASCIKALL DIGITS) 

:2 SPACES 



sSAVE (RO) FOR TYPEOUT 

:G0 TYPE- -OCTAL ASCIKALL DIGITS) 



sSET PREVIOUS MODE TO SUPERVISOR 

TST NOSUPER 

BNE DETl 

BIC «BIT13!BIT12,PSU 

BIS #BIT12.PSW 

MFPI SSP 

POP Rl.RO 



E105: 



ADD «2.R0 
CMP RO.Rl 
BLE BIOS 



TYPE MS6089 
TYPEIT .MSG089 
.DSABL CRF 
IF RO LT OSUPSTK 



{SUPERVISOR STACK 



FOR RO RO TO OSUPSTK-2 BY #2 
$CRLF 



MOV (SP)».R1 
MOV (SP)*.RO 



CMP RO.OSUPSTK 
BGE L520 



TYPE 
TYPEIT . iCRLF 
.DSABL CRF 

TYPOCT RO 
MOV RO,-(SP) 
TYPOC 

.DSABL CRF 

TYPE MSG018 
TYPEIT .MSG018 
.DSABL CRF 

TYPOCT (RO) 
MOV (RO).-(SP) 
TYPOC 

.DSABL CRF 
END {OF FOR RO 



B106: 



!;SAVE RO FOR TYPEOUT 

i:GO TYPE--OCTAL ASCIKALL DIGITS) 

;2 SPACES 



s J SAVE (RO) FOR TYPEOUT 

;:60 TYPE- -OCTAL ASCIKALL DIGITS) 



ADD 92. RO 

CMP RO.OSUPSTK- 

BLE B106 



CVMJAAO MSVll-J MEMORY DIAG. 
SueR DETAILED ERROR REPORT 

053750 

13493 053750 
053750 000402 
053752 

13494 053752 

053752 104401 070412 



D14 
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SEQ 0379 



13495 053756 
053756 

13496 

13497 053756 

13498 053764 

13499 053766 
053766 

13500 053770 
053770 

13501 053774 
053774 
054000 

13502 054002 
054002 

13503 054002 
054002 

13504 054006 
054006 
054010 

13505 054012 
054012 

13506 054016 
054016 
054020 

13507 054022 
054022 
054026 
054032 
054034 

13508 054034 
054034 
054036 

13509 054036 
054036 

13510 054042 
054042 

13511 054042 
054042 

13512 054046 

13513 054052 
0S40S2 

13514 0S40S4 



052737 
006506 

012600 



030000 177776 DETl: 



104401 070376 



020027 000700 
002016 



104401 002660 



010046 
104402 



104401 066107 



011046 
104402 



062700 000002 
020027 000676 
003763 



000402 

104401 070412 

104401 002660 
005037 002220 

012600 
000207 



ELSE 



TYPE hS6091 
TYPEIT .MSG091 
.DSABL CRF 
END ;0F IF RO 



E106: 



sis EMPTY 



BR L521 
L520: jsssj J 



;SET PREVIOUS MODE TO USER 
BIS #BIT13!BIT12,PSU 
MFPI USP 
POP RO 



L52l! 



TYPE MSG090 
TYPEIT .MSG090 
.DSABL CRF 
IF RO LT OUSESTK 



:USER STACK 



FOR RO := RO TO »USESTK-2 BY #2 
JCRLF 



MOV (SP)*,RO 



CMP RO. OUSESTK 
8GE L522 



TYPE 
TYPEIT .iCRLF 
.DSABL CRF 

TYPOCT RO 
MOV RO.-(SP) 
TYPOC 

.DSABL CRF 

TYPE MSG018 
TYPEIT .MSG018 
.DSABL CRF 

TYPOCT (RO) 
MOV (RO).-(SP) 
TYPOC 

.DSABL CRF 
END iOF FOR RO 



ELSE 



B107:i 



;sSAVE RO FOR TYPEOUT 

;;G0 TYPE--OCTAL ASCIKALL DIGITS) 

J 2 SPACES 



ssSAVE (RO) FOR TYPEOUT 

;;G0 TYPE- OCTAL ASCIKALL DIGITS) 



TYPE MSG091 

TYPEIT .MSG091 

.DSABL CRF 

END sOF IF RO 

TYPE JCRLF 

TYPEIT .$CRLF 

.DSABL CRF 

CLR DETFLAG 

POP RO 

RETURN 



;IS EMPTY 



ADD «2.R0 

CMP R0.«USESTK-2 

BLE B107 

E107::s;:;:; 

BR L523 
L522::::i:i 

L523: :::::: 



MOV (SP)..RO 
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ROUTINE BINARY TO OCTAL (ASCII) AND TYPE 



E14 

Page 437 



SEa 0380 



13552 

13553 

13554 

13555 

13556 

13557 

13558 

13559 

13560 

13561 

13562 

13563 

13564 

13565 

13566 

13567 

13568 

13569 

13570 

13571 

13572 

13573 

13574 

13575 

13576 

13577 

13578 

13579 

13580 

13581 

13582 

13583 

13584 

13585 

13586 

13587 

13588 

13589 

13590 

13591 

13592 

13593 

13594 

13595 

13596 

13597 

13598 

13599 

13600 

13601 

13602 

13603 

13604 

13605 

13606 

13607 

13608 



054056 
054062 
054070 
054074 
054100 
054102 
054110 
054116 
054124 
054126 
054130 
054132 
054136 
054140 
054144 
054150 
054154 
054160 
054162 
054164 
054166 
054170 
054172 
054174 
054176 
054200 
054204 
054206 
054212 
054214 
054216 
054220 



017646 
116637 
112637 
062716 
000406 
112737 
112737 
112737 
010346 
010446 
010546 
113704 
005404 
062704 
110437 
113704 
016605 
005003 
006105 
000404 
006105 
006105 
006105 
010503 
006103 
105337 
100016 
042703 
001002 
005704 
001403 
005204 



MOV 
TYPOS 
.BYTE 
.BYTE 



NUM. (SP) 

N 
M 



.SBTTL ROUTINE BINARY TO OCTAL (ASCII) AND TYPE 

•*««**«««**•••***********««*«*****«««*«««««*««******•***«•*«•**««•**•**•*«••«•* 

♦THIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A 6-OIGIT 
•OCTAL (ASCII) NUMBER AND TYPE IT. 

♦♦TYPOS- --ENTER HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE 
♦CALL : 
♦ 
* 
* 
* 
* 
♦ 

♦♦TYPON ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST 

♦♦TYPOS OR $TYPOC 
♦CALL : 

♦ MOV NUM.-(SP) ;;NUMBER TO BE TYPED 

♦ TYPON :jCALL FOR TYPEOUT 
♦ 

♦♦TYPOC-- -ENTER HERE FOR TYPEOUT OF A 16 BIT NUMBER 
♦CALL: 

♦ MOV NUM,-(SP) ;!NUMBER TO BE TYPED 

♦ TYPOC ;;CALL FOR TYPEOUT 



NUMBER TO BE TYPED 
CALL FOR TYPEOUT 

N=l TO 6 FOR NUMBER OF DIGITS TO TYPE 

M»l OR 0 

;!l=TYPE LEADING ZEROS 
;:0=SUPPRESS LEADING ZEROS 



000000 
000001 
054303 
000002 

000001 
000006 
000005 



054303 

000006 
054302 
054301 
000012 



054301 



054302 
177770 



♦TYPOS: MOV 
MOVB 
MOVB 
ADD 
BR 

054301 ♦TYPOC: MOVB 
054303 MOVB 
054300 ♦TYPON: MOVB 
MOV 
MOV 
MOV 
MOVB 
NEG 
ADD 
MOVB 
MOVB 
MOV 
CLR 

1^: ROL 
BR 

2i: ROL 
ROL 
ROL 
MOV 

3$ : ROL 
OECB 
BPL 
BIC 
BNE 
TST 
6EQ 

4$: INC 



a(SP),-(SP) 

l(SP).^OFILL 

(SP)*.^0M0DE»1 

#2.(SP) 

♦TYPON 

dl.^OFILL 

«6.^0M00E*1 

«5.^0CNT 

R3.-(SP) 

R4,-(SP) 

R5.-(SP) 

♦0M0DE*1.R4 

R4 

#6,R4 

R4,*0M0DE 

♦0FILL.R4 

12(SP),R5 

R3 

R5 

3$ 

R5 

R5 

R5 

R5.R3 
R3 

♦OMOOE 
6^ 

#177770. R3 

4^ 

R4 

5^ 

R4 



PICKUP THE MODE 
LOAD ZERO FILL SWITCH 
NUMBER OF DIGITS TO TYPE 
ADJUST RETURN ADDRESS 

SET THE ZERO FILL SWITCH 
SET FOR SIX(6) DIGITS 
SET THE ITERATION COUNT 
SAVE R3 
SAVE R4 
SAVE R5 

GET THE NUMBER OF DIGITS TO TYPE 

SUBTRACT IT FOR MAX. ALLOWED 

SAVE IT FOR USE 

GET THE ZERO FILL SWITCH 

PICKUP THE INPUT NUMBER 

CLEAR THE OUTPUT WORD 

ROTATE MSB INTO "C" 

GO DO MSB 

FORM THIS DIGIT 



GET LSB OF THIS DIGIT 
TYPE THIS DIGIT? 
BR IF NO 
GET RID OF JUNK 
TEST FOR 0 
SUPPRESS THIS 0? 
BR IF YES 

DON'T SUPPRESS ANYMORE 0' 



F14 
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SEQ 0361 



13609 054222 


052703 


000060 




BIS 


#'0.R3 


13610 054226 


052703 


000040 


5$: 


BIS 


»' .R3 


13611 054232 


110337 


054276 




MOVB 


R3.8$ 


13612 054236 








TYPE 


6i 


054236 


104401 


054276 




TYPEIT 


.8* 










.DSABL 


CRF 


13613 054242 


105337 


054300 


6$: 


OECB 


$OCNT 


13614 054246 


003347 






BGT 


2* 


13615 054250 


002402 






BLT 


7$ 


13616 054252 


005204 






INC 


R4 


13617 054254 


000744 






BR 


2$ 


13618 054256 


012605 




7$: 


MOV 


(SP)».R5 


13619 054260 


012604 






MOV 


(SP)*,R4 


13620 054262 


012603 






MOV 


(SP)».R3 


13621 054264 


016666 


000002 000004 




MOV 


2CSP).4(SP) 


13622 054272 


012616 






MOV 


(SP)».(SP) 


13623 054274 


000002 






RTI 


13624 054276 


000 




8$: 


.BYTE 


0 


13625 054277 


000 






.BYTE 


0 


13626 054300 


000 




$OCNT: 


.BYTE 


0 


13627 054301 


000 




♦OFILL: 


.BYTE 


0 


13628 054302 


000000 




$OMODE: 


.UORO 


0 



MAKE THIS DIGIT ASCII 
MAKE ASCII IF NOT ALREADY 
SAVE FOR TYPING 
GO TYPE THIS DIGIT 



COUNT BY 1 

BR IF MORE TO DO 

BR IF DONE 

INSURE LAST DIGIT ISN'T A BLANK 
GO DO THE LAST DIGIT 
RESTORE R5 
RESTORE R4 
RESTORE R3 

SET THE STACK FOR RETURNING 
RETURN 

STORAGE FOR ASCII DIGIT 

TERMINATOR FOR TYPE ROUTINE 

OCTAL DIGIT COUNTER 

ZERO FILL SWITCH 

NUMBER OF DIGITS TO TYPE 
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SEQ 0S62 



13630 
13631 
13632 
13633 
13634 
13635 
13636 
13637 
13638 
13639 
13640 



.SBTTL ROUTINE CONVERT BINARY TO DECIMAL AND TYPE 



13641 

13642 

13643 

13644 

13645 

13646 

13647 

13648 

13649 

13650 

13651 

13652 

13653 

13654 

13655 

13656 

13657 

13658 

13659 

13660 

13661 

13662 

13663 

13664 

13665 

13666 

13667 

13668 

13669 

13670 

13671 

13672 

13673 

13674 

13675 

13676 



054304 

054304 

054306 

054310 

054312 

054314 

054316 

054322 

054326 

054330 

054332 

054340 

054342 

054346 

054352 

054354 

054360 

054362 

054364 

054366 

054370 

054372 

054374 

054376 

054400 

054402 

054404 

054406 

054414 

054420 

054424 

054426 

054430 

054434 

054436 

054440 

054442 

054444 

054446 

054450 

054456 

054460 

054460 

054462 

054464 

054466 

054470 



010046 

010146 

010246 

010346 

010546 

012746 

016605 

100004 

005405 

112766 

005000 

012703 

112723 

005002 

016001 

160105 

002402 

005202 

000774 

060105 

005702 

001002 

105716 

100407 

106316 

103003 

116663 

052702 

052702 

110223 

005720 

020027 

002746 

003002 

010502 

000764 

105726 

100003 

116663 

105013 

012605 
012603 
012602 
012601 
012600 



020200 
000020 



000055 000001 



054520 
000040 

054510 



000001 177777 

000060 

000040 



000010 



******************************* 

♦THIS ROUTINE IS USED TO CHANGE 
♦SIGNED DECIMAL (ASCII) NUMBER 
♦NUMBER IS POSITIVE OR NEGATIVE 
♦BEFORE THE FIRST DIGIT OF THE 
♦REPLACED UITH SPACES. 
•CALL: 

• MOV NUM.-(SP) 

• TYPDS 

iTYPDS: PUSH R0.R1.R2,R3.R5 



177777 177776 





MOV 


#20200, -(SP) 




MOV 


20(SP).R5 




BPL 


1* 




NEG 


R5 




MOVB 


»' -,1(SP) 




CLR 


RO 




MOV 


#$DBLK,R3 




MOVB 


.(R3)* 


2i: 


CLR 


R2 




MOV 


♦DTBL(R0).R1 


3$: 


SUB 


R1.R5 




BLT 


4$ 




INC 


R2 




BR 


3< 


4*: 


ADO 


R1.R5 




TST 


R2 




BNE 


5» 




TSTB 


(SP) 




BMI 


7* 


5*: 


ASLB 


(SP) 




BCC 


6« 




MOVB 


1(SP).-1(R3) 


6$: 


BIS 


#'0.R2 


7$: 


BIS 


#' .R2 




MOVB 


R2.(R3)* 




TST 


(RO)* 




CMP 


R0.«10 




BLT 


2$ 




BGT 


6i 




MOV 


R5.R2 




BR 


6$ 


8$: 


TSTB 


(SP)* 




BPL 


9* 




MOVB 


-1(SP).-2(R3) 


9$: 


CLRB 


(R3) 




POP 


R5.R3.R2.R1.R0 



************************************************ 

A 16-BIT BINARY NUMBER TO A 5-DIGIT 
AND TYPE IT. DEPENDING ON WHETHER THE 

A SPACE OR A MINUS SIGN UILl BE TYPED 
NUMBER. LEADING ZEROS UILL ALUAYS BE 



;;PUT THE BINARY NUMBER ON THE STACK 
:iGO TO THE ROUTINE 



MOV RO.-(SP) 
MOV Rl.-(SP) 
MOV R2.-(SP) 
MOV R3.-(SP) 
MOV R5,-(SP) 

SET BLANK SWITCH AND SIGN 

GET THE INPUT NUMBER 

BR IF INPUT IS POS. 

MAKE THE BINARY NUMBER POS. 

MAKE THE ASCII NUMBER NEG. 

ZERO THE CONSTANTS INDEX 

SETUP THE OUTPUT POINTER 

SET THE FIRST CHARACTER TO A BLANK 

CLEAR THE BCD NUMBER 

GET THE CONSTANT 

FORM THIS BCD DIGIT 

BR IF DONE 

INCREASE THE BCD DIGIT BY 1 

ADD BACK THE CONSTANT 

CHECK IF BCD DIGIT-0 

FALL THROUGH IF 0 

STILL DOING LEADING O'S? 

BR IF YES 

MSD? 

BR IF NO 

YES- -SET THE SIGN 

MAKE THE BCD DIGIT ASCII 

MAKE IT A SPACE IF NOT ALREADY A DIGIT 

PUT THIS CHARACTER IN THE OUTPUT BUFFER 

JUST INCREMENTING 

CHECK THE TABLE INDEX 

GO DO THE NEXT DIGIT 

GO TO EXIT 

GET THE LSD 

GO CHANGE TO ASCII 

WAS THE LSD THE FIRST NON-ZERO? 

BR IF NO 

YES- SET THE SIGN FOR TYPING 
SET THE TERMINATOR 

MOV (SP)».R5 
MOV (SP)'.R3 
MOV (SP)..R2 
MOV (SP)..R1 
MOV (SP)«.O0 
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SEQ 0383 



13677 054472 

054472 104401 054520 

13678 054476 016666 000002 000004 

13679 054504 012616 

13680 054506 000002 

13681 054510 023420 $OTBL: 

13682 054512 001750 

13683 054514 000144 

13684 054516 000012 

13685 054520 000000 000000 000000 tDBLK: 
054526 000000 



TYPE 

TYPEIT 

.DSABL 

MOV 

MOV 

RTI 

10000. 

1000. 

100. 

10. 

.UORO 



$OBLK 
. $OBLK 
CRF 

2(SP).4(SP) 
(SP)».(SP) 



0,0,0,0 



::N0U TYPE THE NUMBER 

:: AD JUST THE STACK 
:! RETURN TO USER 



CVMJAAO MSVll-J r«MORY DIAG. 
ROUTIME TTY INPUT 

13687 
13688 
13689 
13690 
13691 
13692 
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SEQ 0384 



.SBTTL ROUTINE TTY INPUT 

♦SOFTWARE SWITCH REGISTER CHANGE ROUTINE. 
♦ROUTINE IS ENTERED FROM THE TRAP HANDLER. AND WILL 
♦SERVICE THfe TEST FOR CHANGE IN SOFTWARE SWITCH REGISTER TRAP CALL 
♦WHEN OPERATING IN TTY FLAG MODE. 



13693 








.ENABLE 


LSB 


13694 054530 






KKSWR: 






13695 054530 


005737 


047246 




TST 


XOCHAR 


13696 054534 


001406 






BEQ 


NOCH 


13697 054536 


013746 


047246 




MOV 


XOCHAR, -(SP) 


13698 054542 


005037 


047246 




CLR 


XOCHAR 


13699 054546 


000137 


054570 




JMP 


CONTSl 


13700 054552 


105777 


126064 


NOCH: 


TSTB 


S4TKS 


13701 054556 


100136 






BPL 


SWREND 


13702 054560 


117746 


126060 




MOVB 


a*TKB,-(SP) 


13703 054564 


042716 


177600 




BIC 


#tC177,(SP) 


13704 054570 


022716 


000006 


CONTSl : 


CMP 


*6,(SP) 


13705 054574 


001002 






BNE 


1* 


13706 054576 


004737 


041054 




CALL 


FIELDSERVICE 


13707 054602 


022716 


000024 




CMP 


#24, (SP) 


13708 054606 


001002 






BNE 


16* 


13709 054610 


004737 


055152 




CALL 


CONTT 


13710 054614 


022716 


000003 


16i: 


CMP 


»3.(SP) 


13711 054620 


001454 






BEQ 


5* 


13712 054622 


022716 


000023 


2\: 


CMP 


»23.CSP) 


13713 054626 


001002 






BNE 


17* 


13714 054630 


004737 


055226 




CALL 


CONTS 


13715 054634 


022716 


000013 


17*: 


CMP 


013. (SP) 


13716 054640 


001005 






BNE 


6* 


13717 054642 








TYPE 


$CNTLK 


054642 


104401 


055144 




TYPEIT 


,*CNTLK 










.OSABL 


CRF 


13718 054646 


013706 


002146 




MOV 


CTLKVEC.SP 


13719 054652 


000207 






RETURN 




13720 054654 


022737 


000176 002636 


6$: 


CMP 


OSWREG.SUR 


13721 054662 


001075 






BNE 


CKEND 


13722 054664 


022716 


000007 




CMP 


07. (SP) 


13723 054670 


001072 






BNE 


CKEND 


13724 054672 


005737 


002062 




TST 


*AUTO 


13725 054676 


001067 






BNE 


CKEND 


13726 054700 








TYPE 


$CNTLG 


054700 


104401 


055750 




TYPEIT 


.♦CNTLG 










.OSABL 


CRF 


13727 054704 






*GTSWR; 


TYPE 


*MSWR 


054704 


104401 


055755 




TYPEIT 


, $MSUR 










.DSABL 


CRF 


13728 054710 








TYPOCT 


SSWR 


054710 


017746 


125722 




MOV 


9SWR, (SP) 


054714 


104402 






TYPOC 












.DSABL 


CRF 


13729 054716 








TYPE 


4MNEU 


054716 


104401 


055766 




TYPEIT 


. *MNEW 










.DSABL 


CRF 


13730 054722 


005046 




3$: 


CLR 


-(SP) 


13731 054724 


005046 






CLR 


-(SP) 


13732 054726 


105777 


125710 


4$: 


TSTB 


S$TI<S 



SOMETHING 
GO ON IF 
USE IT 



THERE? 
NOT 



CHAR THERE? 

IF NO. DON'T WAIT AROUND 
SAVE THE CHAR 
STRIP-OFF THE ASCII 

IS IT CONTROL F? 

NO SKIP 



T? 



IS IT CONTROL 
NO - SKIP 

YES - CALL CONTROL T ROUTINE 
IS IT CONTROL C? 

YES EXIT ♦♦♦♦♦NOTE^^^^+ STACK IS SCREWED UP! 
IS IT CONTROL S? 
NO - SKIP 

YES - CALL CONTROL S ROUTINE 
IS IT CONTROL K? 
NO - SKIP 
TYPE A tK 



RESET KSP TO AFTER PATTERN EXEC ROUTINE 
RETURN TO PATTERN EXEC ROUTINE 

IS THE SOFT-SWR SELECTED? 

BRANCH IF NO 

IS IT A CONTROL G? 

NO. RETURN TO USER 
ARE WE RUNNING IN AUTO -MODE? 
BRANCH IF YES 
5 ECHO THE CONTROL -G (tG) 



J TYPE CURRENT CONTENTS 



;0F THE SWR 

:SAVE aSWR FOR TYPEOUT 

;G0 TYPE--OCTAL ASCIKALL DIGITS) 

; PROMPT FOR NEW SWR 



CLEAR COUNTER 
THE NEW SUR 
CHAR THERE? 



CVMJAAO MSVll-J MEMORY DIAG. 
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SEQ 0385 



13733 


054732 


100375 






BPL 


4$ 


13734 


ACil 7Yil 

054734 


117746 


1 ^C7Ail 

125704 




MOvB 


3»TKB, -CSP J 


13735 


/%C4 7il A 

054740 


Ail ^7 1 C 

042716 


1 77^AA 

177600 




DTP 

BIC 


ftTC177,lSPj 


13736 


/NCil 7il il 

054744 


A^ 1 c. ^7 

021627 


AAAAAT 

000003 




CMP 


f CO ^ AT 

CSP J , w3 


13737 


054750 


AA1 AA^ 
001006 






BNc 


1% 


13739 


054752 






3* : 


TYPE 


4PUTI P 

f CNTLC 




054752 


• Ail A A 1 

104401 


055736 




T VDCTT 

TYPclT 
.OSABL 


> fCNTLC 
CRF 


13739 


054756 


A£97A£. 

002 'Oo 


AAAAA& 
000006 




AAA 

ADO 


siC CO 
»6 , SP 


13740 


054702 


AAAI 17 
0001 3 ' 


Ail ACTil 

040334 




JMP 


Al ITT 

QUIT 


13741 


034 'o6 


A3 1 ^37 

02162 ' 


AAAA3C 

000023 


7 4. 

7» : 


CHr 


f CD ^ A'^C 

ISP J ,023 


IS f^e 


034 t fc 


AA 1 AAC 
001003 






DNc 


Q t 
7* 


13 »43 


U34 ' ' 4 








T VDC 

1 Trt 


4 PMTI 1 1 




v;34 ' ' 4 


1 AAA A 1 
104401 


033 '43 




T VDCTT 
1 Trt J 1 


roc 




U33UUU 


A/: 07A<i 
Ooc 'OO 


AAAAA& 
000006 


0* : 


Ann 


CD 


13 '43 


033U04 


AAA7Ai^ 

UUU ' 40 






BR 


3* 


13/40 


U33UU0 


A31 /137 
02102 ' 


AAAA1 ^ 
000013 


ot . 

T»» : 


CMP 


(SP).#15 


13 '4 / 


U33Ulc 


AA1 A3A 






BNE 


13$ 


13 '40 


033U14 


AAe:7i t 

too 


AAAAAA 




TST 


4(SP) 


13749 


055020 


001403 






6EQ 


10* 


13750 


055022 


016677 


000002 125606 




MOV 


2(SP).aSUR 


1 17i\ 1 
13 '31 


U33U3U 






lu* : 


IF SURFLG IS TRUE 




U33U3U 


AA«;7T7 
OU3 ' 3 ' 


002300 










055034 


001403 










13 ijc 


U33U JO 


A<137A<» 
UOc 'UO 


AAAAAA 




ADD 


«6.SP 


1 V7CT 

13 '33 


U3 jU4e 

055042 

033044 


AAAAA3 
000402 






ELSE 




13754 


055044 


062706 


000010 




ADD 


OlO.SP 


13755 


055050 
055050 








END 




13756 


055050 








TYPE 


$CRLF 




055050 


104401 


002660 




TYPEIT 


.$CRLF 










.DSABL 


CRF 


15757 


0S5054 


000002 




SUREND: 


RTI 





IF NOT TRY AGAIN 

PICK UP CHAR 

MAKE IT 7 -BIT ASCII 

IS IT A CONTROL -C? 

BRANCH IF NOT 

YES. ECHO CONTROL -C ( tC) 



CLEAN UP STACK 

CONTROL -C HALT 

IS IT A CONTROL -U? 

BRANCH IF NOT 

YES. ECHO CONTROL -U (tU) 



IGNORE PREVIOUS TNPUT 
LET'S TRY IT AGAIN 
IS IT A <CR>? 
BRANCH IF NO 

YES, IS IT THE FIRST CHAR? 
BRANCH IF YES 
SAVE NEU SUR 



! J CLEAR UP STACK 

.•s CLEAR UP STACK 
jiECHO <CR> AND <LF> 
J } RETURN 



TST SURFLG 
BEQ L524 



BR L525 
L524:::i:ii 

L525: 



CVMJAAO MSVll-J MEMORY DIAG. 
ROUTINE TTY INPUT 
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SEQ 0366 



13750 055056 062706 000002 

13759 055062 000002 

13760 055064 004737 047250 

13761 0S5070 021627 000060 

13762 055074 002420 

13763 055076 021627 000067 

13764 055102 003015 

13765 055104 042726 000060 

13766 055110 005766 000002 

13767 055114 001403 
13760 055116 006316 

13769 055120 006316 

13770 055122 006316 

13771 055124 005266 000002 

13772 055130 056616 177776 

13773 055134 000674 

13774 055136 

055136 104401 002657 

13775 055142 000716 

13776 055144 136 113 
055147 012 000 

13777 
13770 



CKENO: 


ADD 


*2,SP 


FIX STACK 




RTI 




RETURN 


13$: 


CALL 


$TYPEC 




ECHO CHAR 




CMP 


(SP),*60 




CHAR < 0? 




BLT 


15$ 




BRANCH IF YES 




CMP 


(SP),*67 




CHAR > 7? 




BGT 


15$ 




BRANCH IF YES 




BIC 


*60,(SP)* 




STRIP-OFF ASCII 




TST 


2(SP) 




IS THIS THE FIRST CHAR 




BEQ 


14$ 




BRANCH IF YES 




ASL 


(SP) 




NO. SHIFT PRESENT 




ASL 


(SP) 




CHAR OVER TO MAKE 




ASL 


(SP) 




ROOM FOR NEW ONE. 


14$ : 


INC 


2(SP) 




KEEP COUNT OF ChAR 




BIS 


-2(SP).(SP) 




SET IN NEW CHAR 




BR 


4$ 




GET THE NEXT ONE 


15$: 


TYPE 


$QUES 




TYPE ?<CR><LF> 




T VOCTT 
TlPtlT 


, $QUES 






.DSABL 


CRF 






BR 


8$ 


: SIMULATE CONTROL -U 


$CNTLK: 


•ASCIZ 


/tK/<15><12> {CONTROL K ASCII STRING 




.EVEN 








.DSABL 


LSB 





CVMJAAO MSVll-J MEMORY 01 AG. 
ROUTINE TTV INPUT 

13781 055152 
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13782 055152 
055152 

13783 055154 
055154 

13793 055160 
055160 
055164 

13794 055166 
055166 

13795 055172 
05517,' 

13796 055172 
055172 

13797 055176 
055176 
055202 
055204 
055205 

13798 055206 
055206 

13799 055212 
055212 
055216 
055220 
055221 

13803 055222 
055222 

13804 055224 
13805 



010046 
104401 



005737 
001402 

104401 



104401 



013746 
104403 
003 
000 



104401 



013746 
104403 
002 
000 



012600 
000207 



002660 
002126 
070424 

070440 
002102 

070446 
002300 



SEQ 0387 



CONTT: SUBTST <<C0NTRCM. T>> 
******************** ***********************•**•*••••••*•••*•••*•••**•••••*****• 

*SUBTEST CONTROL T 

******************************************************************************* 

PUSH RO 



TYPE *CRLF 
TYPEIT .*CRLF 
.DSABL CRF 
IF RLFLAG IS TRUE 



TYPE MSG092 
TYPEIT .MSG092 
.DSABL CRF 
END ;0F IF RLFLAG 

TYPE MSG093 

TYPEIT .MSG093 

.DSABL CRF 

TYPOCS BANK.. 3 

MOV BANK,-(SP) 
TYPOS 

.BYTE 3 

.BYTE 0 

.DSABL CRF 

TYPE MSG095 

TYPEIT .MSG095 

.DSABL CRF 

TYPOCS REALPAT..2 
MOV 
TYPOS 

.BYTE 2 

.BYTE 0 

.DSABL CRF 

POP RO 



{RELOCATED 



:BANK' 



L526: 



REALPAT,-(SP) 



iTYPE 3 DIGITS 
SAVE BANK FOR TYPEOUT 
GO TYPE- -OCTAL ASCII 
TYPE 3 DIGIT(S) 
SUPPRESS LEADING ZEROS 

jPAT- 



;TYPE 2 DIGITS 
SAVE REALPAT FOR TYPEOUT 
GO TYPE-OCTAL ASCII 
TYPE 2 DIGIT(S) 
SUPPRESS LEADING ZEROS 



MOV RO.-(SP) 



TST RLFLAG 
BEQ L526 



RETURN 



MOV (SP)«,RO 



CvrijAAO MSVll-J MCMORY OIAG. 
CONTROL S £ CONTROL Q 
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SEQ 0388 



13806 05'^2^6 CONTS: SUBTST <<CONTROL S 6 CONTROL Q>> 

; ******************************************************************************* 

: ♦SUBTEST CONTROL S £ CONTROL Q 

; ******************************************************************************* 



13807 


055226 






POP 


RO 


:GET RID OF RETURN ADDRESS FROH 


STACK 




053226 












nOV (SP)*.RO 


1 iOvo 
13809 




103 III 






1 Kb 


;UAIT FOR CHARACTER 


055234 


100375 




BPL 


C0NTS2 




1 1810 


055236 


117716 


125402 


MOVB 




: REPLACE OVER OLD CHARACTER ON STACK 


13811 


055242 


042716 


177600 


BIC 


#tC177.(SP) 


! STRIP ALL BUT ASCII 




13812 


055246 
055246 
055252 


021627 
001003 


000021 


IF (SP) 


EQ »21 


;IF IT IS A CONTROL Q 


CMP (SP).#21 
BNE L527 


13813 


055254 


000137 


054570 


JttP 


CONTSl 






13814 


055260 
055260 
055262 


000401 




ELSE 




L527:;s 


BR L530 


13815 


055262 


000762 




BR 


C0NTS2 






13816 


055264 
055264 






END ;0F 


IF (SP) 


L530:ii 





CVMJAAO MSVll-J MEMORY OI*G. 
CONTROL S 6 CONTROL Q 



13818 
13819 
13820 
13821 
13822 
13823 
13824 
13825 
13826 
13827 
13828 
13829 
13830 
13831 
13832 
13833 
13834 
13835 
13836 
13837 
13838 
13839 
13840 
13841 
13842 
13843 
13844 
13845 
13846 
13847 
13848 
13849 
13850 
13851 
13852 
13853 
13654 
13855 
13856 
13857 
13858 
13859 
13860 
13861 
13862 
13863 
13864 



N14 
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SEQ 0389 



*THIS ROUTINE UILL INPUT A SINGLE CHARACTER FROM THE TTY 
*CALL: 

• ROCHR 

• RETURN HERE 
* 



: INPUT A SINGLE CHARACTER FROM THE TTY 
: CHARACTER IS ON THE STACK 
;MITH PARITY BIT STRIPPED OFr" 



055264 
055266 
055274 
055300 
055302 
055310 
055316 
0*55324 
Of 5326 
0! 5332 
01 334 
055340 
055344 
055350 
055352 
055354 
055362 
055364 
055372 
055374 
055402 
055404 
055412 



011646 






IRDCHR • 


MOV 


rcp) .(SP) 


■ ■ PUSH DOUN THE PC 


016666 


000004 


000002 




MOV 


4(SP) 2(SP) 


■ - SAVE THE PS 


105777 


125342 






TSTB 


atTKS 


. :UAIT FOR 


100375 








BPL 




i :A CHARACTER 


117766 


125336 


000004 




MOVB 


9ITKB.4(SP) 


;:REAO THE TTY 


042766 


177600 


000004 




BIC 


•tC<177>.4(SP) 


i :GET RID OF JUNK IF ANY 


026627 


000004 


000023 




CMP 


4(SP).023 


(;IS IT A CONTROL-S? 


001013 








BNE 


31 


BRANCH IF NO 


105777 


125310 




2$: 


TSTB 


StTKS 


,:UAIT FOR A CHARACTER 


100375 








BPL 


21 


.{LOOP UNTIL ITS THERE 


117746 


125304 






MOVB 


aiTKB.-(SP) 


:GET CHARACTER 


042716 


177600 






BIC 


#tC177,(SP) 


.jMAKE IT 7-BIT ASCII 


022627 


000021 






CMP 


(SP)*.a21 


;IS IT A CONTROL -Q? 


001366 








BNE 


21 


;IF NOT DISCARD IT 


000750 








BR 


1* 


sYES. RESUME 


026627 


000004 


000021 


31: 


CMP 


4(SP).021 


:IS IT A RANDOM CONTROL-Q? 


001744 








BEQ 


U 


; BRANCH BACK IF SO 


026627 


000004 


000140 




CMP 


4(SP).0140 


;IS IT UPPER CASE? 


002407 








BLT 


4$ 


: BRANCH IF YES 


026627 


000004 


000175 




CMP 


4(SP).<H75 


; IS IT A SPECIAL CHAR? 


003003 








BGT 


41 


; BRANCH IF YES 


042766 


000040 


000004 




BIC 


040.4{SP) 


:MAKE IT UPPER CASE 


000002 






4*: 


RTI 




;G0 BACK TO USER 



jR-C 
sR-C 



13865 
13866 
13867 
13868 
13669 
13670 
13871 
13872 



0SS414 
055416 
055420 
055424 
055430 
055432 
055434 
055436 
055442 
055444 
055444 

055450 
055452 
055454 
055462 
05546A 
055470 
055474 
055500 



010346 
005046 
012703 
022703 
101477 
104411 
112613 
122713 
001016 



:*THIS ROUTINE UILL INPUT A STRING FROM THE TTY 
:*CALL: 

ROLIN INPUT A STRING FROM THE TTY 

RETURN HERE ADDRESS OF FIRST CHARACTER UILL BE ON THE STACK 

TERMINATOR UILL BE A BYTE OF ALL O'S 



;* 

<RDLIN: 



055712 
0SS736 



000003 



1$: 
2$: 



104401 055736 



005726 
012603 
032777 
001404 
005037 
000137 
000137 
122713 



000400 125154 

002420 
040604 
040534 
000177 



11$: 
3«: 



MOV 


R3.-(SP) 




iSAVE R3 


CLR 


-(SP) 




! CLEAR THE RUBOUT KEY 


MOV 


•♦TTYIN.R3 




iGET ADDRESS 


CMP 


<HTTYIN*20.,R3 




.BUFFER FULL? 


6L0S 


8$ 




'BR IF YES 


RDCHR 






IgO read one CHARACTER FROM THE TTY 


MOVB 


(SP)*,(R3) 




GET CHARACTER 


CMPB 


#3,(R3) 




IS IT A CONTROL -C? 


BNE 


31 




BRANCH IF NO 


TYPE 


♦CNTLC 




TYPE A CONTROL -C (tC) 


TYPEIT 


. ICNTLC 




.DSA6L 


CRF 




TST 


(SP)* 




CLEAN RUBOUT KEY OFF OF THE STACK 


MOV 


(SP)*.R3 




RESTORE R3 


BIT 


«6IT8.aSUR 




IS THERE A HALT FLAG SET IN THE SUR? 


BEQ 


11$ 




BRANCH IF NOT TO HALT ROUTINE 


CLR 


STOPOK 




GET READY TO HALT PROGRAM 


JMP 


EXIT i 




GO HALT PROGRAM 


JMP 


QUIT 




GOTO CONTROL -C HALT 


CMPB 


#177. (R3) 




IS IT A RUBOUT 



CVMJAAO risvii- 


J MCMORY 


DIA6. 


MACRO 


V05. 


01b Friday IS 


CONTROL S 6 CONTROL 0 








13873 055504 


001022 








BNE 


13874 055506 


005716 








TST 


13875 055510 


001007 








BNE 


13876 055512 


112737 


000134 


053710 




nova 


13877 055520 










TYPE 


055520 


104401 


055710 






TYPEIT 












.DSABL 


13878 055524 


012716 


177777 






nov 


13879 055530 


005303 






41 


DEC 


13880 055532 


020327 


055712 






CMP 


13881 055536 


103434 








BLO 


13882 055540 


111337 


055710 






MOVB 


13883 055544 










TYPE 


055544 


104401 


055710 






TYPEIT 












.DSABL 


13884 055550 


A A A** 

000725 








BR 


13885 055552 


005716 






5i 


: TST 


13886 055554 


001406 








BEO 


13887 055556 


112737 


000134 


055710 




MOVB 


13888 055564 










TYPE 


055564 


104401 


055710 






TYPEIT 












. DSABL 


13889 055570 


005016 








CLR 


13890 055572 


« A A^ i V 

122713 


000025 




6i 


CMPB 


13891 055576 


A A < A A 9 

001003 








BNE 


13892 055600 










TYPE 


055600 


« Ail A 4 

104401 


055743 






TYPEIT 












.DSABL 


13893 055604 


A A A^ AP 

000705 








BR 


13894 055606 


122713 


000022 




7i 


CMPB 


13895 055612 


001011 








BNE 


13896 055614 


105013 








CLRB 


13897 055616 










TYPE 


055616 


104401 


002660 






TYPEIT 












.DSABL 


13898 055622 










TYPE 


055622 


104401 


055712 






TYPEIT 












.DSABL 


13899 055626 


AAAf 

000676 








BR 


13900 055630 








8$ 


: TYPE 


055630 


104401 


002657 






TYPEIT 












.DSABL 


13901 055634 


A A A£ ^ 4 

000671 








BR 


13902 055636 


111337 


055710 




9$ 


MOVB 


• VAAV APBf 4 

13903 055642 










TYPE 


055642 


104401 


055710 






TYPEIT 












.DSABL 


13904 055646 


122723 


000015 






CMPB 


■ VAAB ABC^C'% 

13905 055652 


001264 








BNE 


13906 0SS6S4 


4 ACA£ V 

105063 


177777 






CLRB 


13907 0SS660 










TYPE 






002661 






TYPEIT 












.DSABL 


13908 055664 


005726 








TST 


13909 055666 


012603 








MOV 


13910 055670 


011646 








MOV 


13911 055672 


016666 


000004 


000002 




MOV 



B15 
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SEQ 0390 



5* ;;BR IF NO 

(SP) ::IS THIS THE FIRST RUB OUT ? 

41 s;BR IF NO 

0'\.10$ !:TYPE A BACK SLASH 

101 

.lOi 

CRF 

0-1. (SP) ::SET THE RUBOUT KEY 

R3 ; {BACKUP BY ONE 

R3.0iTTYIN ;!STACK EMPTY? 

8$ ;:BR IF YES 

(R3).10$ ssSETUP TO TYPEOUT THE DELETED CHAR. 

10$ :;G0 TYPE 



2i ;:G0 READ ANOTHER CHAR. 

(SP) : {RUBOUT KEY SET? 

6i ::BR IF NO 

0'\,10* iiTYPE A BACK SLASH 

10$ 

.10$ 

CRF 

(SP) s: CLEAR THE RUBOUT KEY 

#25, (R3) ;:IS CHARACTER A CTRL U? 

7$ ::BR IF NO 

♦CNTLU {jTYPE A CONTROL "U 

.*CNTLU 

CRF 

1$ :;G0 START OVER 

*22.(R3) :;IS CHARACTER A "tR"? 

9$ : .-BRANCH IF NO 

(R3) :. -CLEAR THE CHARACTER 

♦CRLF s {TYPE A "CR" £ "LF" 

. $CRLF 

CRF 

$TTYIN !:TrPE THE INPUT STRING 

.$TTYIN 

CRF 

2$ ;!G0 PICKUP ANOTHER CHACTCR 

*QUES siTYPE A '?' 

.$QUES 

CRF 

1$ ;; CLEAR THE BUFFER AND LOOP 

(R3).10* ;:ECH0 THE CHARACTER 

10$ 



#15, (R3)* !! CHECK FOR RETURN 

2$ ;!L0OP IF NOT RETURN 

-1(R3) ;;CLEAR RETURN (THE 15) 

$LF :sTYPE A LINE FEED 



(SP)* ss CLEAN RUBOUT KEY FROM THE STACK 

(SP)*,R3 ; {RESTORE R3 

(SP).-(SP) !. -ADJUST THE STACK AND PUT ADDRESS OF THE 
4(SP).2(SP) FIRST ASCII CHARACTER ON IT 



CVMJAAO MSVll-J M£MO«>^ OIAG. 
CONTROL S 6 CONTROL Q 



C15 

riACRO VOS.Olb Friday 15 Feb 85 16:10 Page 442 2 



13912 


055700 


012766 


055712 


000004 




MOV 


«TTYIN.4(SP) 


13913 


055706 


000002 








RTI 


13914 


055710 


000 








.BYTE 


0 


13915 


055711 


000 








.BYTE 


0 


13916 


055712 


000024 






*TTYIN: 


.REPT 


20. 


13919 


055736 


136 


103 


015 


*CNTLC: 


.ASCIZ 


/tC/<15><12> 




055741 


012 


000 










13920 


055743 


136 


125 


015 


JCNTLU: 


.ASCIZ 


/tu/<15><12> 




055746 


012 


000 








13921 


055750 


136 


107 


015 


♦CNTLG: 


•ASCIZ 


/tG/<15><12> 




055753 


012 


000 










13922 


055755 


015 


012 


123 


tnSUR: 


.ASCIZ 


<15><12>/SUR = 




055760 


127 


122 


040 








055763 


075 


040 


000 








13923 


055766 


040 


040 


116 


iMNEU: 


.ASCIZ 


/ NEU - / 




055771 


105 


127 


040 










055774 


075 


040 


000 








13924 












.EVEN 





SEQ 0391 



RETURN 

STORAGE FOR ASCII CHAR. TO TYPE 
TERMINATOR 

RESERVE SIZE BYTES FOR TTY INPUT 
CONTROL "C" 



! {CONTROL "U" 
CONTROL "G" 



CVMJAAO MSVll-J MEMORY DIAG. MACRO VOS.Olb Friday 15-Feb-85 16: 
ROUTINE READ AN OCTAL NUMBER FROM THE TTY 
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10 



SEQ 0392 



13926 
13927 
13928 
13929 
13930 
13931 
13932 
13933 
13934 
13935 
13936 
13937 
13938 
13939 
13940 



13941 
13942 
13943 
13944 
13945 
13946 
13947 
13948 
13949 
13950 
13951 
13952 
13953 
13954 
13955 
13956 
13957 
13958 
13959 
13960 
13961 
13962 
13963 
13964 



13965 
13966 
13967 
13968 



056000 
056002 
056010 
056010 
056012 
056014 
056016 
056020 
056022 
056026 
056030 
056032 
056034 
056036 
056042 
056044 
056050 
056052 
056054 
056056 
056060 
056062 
056064 
056066 
056072 
056074 
056076 
056100 
056104 
056110 
056110 
056112 
056114 
056116 
056120 
056122 
056124 
056124 



13969 056126 

13970 056130 
056130 

13971 056134 
056134 



011646 
016666 

010046 
010146 
010246 
104412 
012600 
010037 
005001 
005002 
112046 
001420 
122716 
003026 
122716 
002423 
006301 
006102 
006301 
006102 
006301 
006102 
042716 
062601 
000756 
005726 
010166 
010237 

012602 
012601 
012600 
000002 
005726 
105010 

104401 

000000 

104401 



104401 



000004 000002 



.SBTTL ROUTINE READ AN OCTAL NUMBER FROM THE TTY 

♦THIS ROUTINE WILL READ AN OCTAL (ASCII) NUMBER FROM THE TTY AND 
♦CHANGE IT TO BINARY. 

♦THE INPUT CHARACTERS WILL BE CHECKED TO INSURED THEY ARE LEGAL 
♦OCTAL DIGITS. IF AN ILLEGAL CHARACTER IS READ A "?" UILL BE TYPED 
♦FOLLOWED BY A CARRIAGE RETURN-LINE FEED. THE COMPLETE NUMBER MUST 
♦THEN BE RETYPED. THE INPUT IS TERMINATED BY TfPING A CARRIAGE RETURN. 
♦CALL : 

RDOCT sjREAD AN OCTAL NUMBER 

RETURN HERE ;:LOU ORDER BITS ARE ON TOP OF THE STACK 

HIGH ORDER BITS ARE IN iHIOCT 
PROVIDE SPACE FOR THE 
INPUT NUMBER 



♦ 
* 

iROOCT: 



056126 

000060 
000067 



2$: 



177770 



000012 
056146 



3$; 



4$: 



5$: 



067-'76 
070016 



MOV 
MOV 
PUSH 



(SP).-CSP) 
4(SP).2CSP) 
R0.R1.R2 



RTI 

TST 

CLRB 

TYPE 

TYPEIT 

.DSABL 

.UORD 

TYPE 

TYPEIT 

.OSABL 

TYPE 

TYPEIT 



MOV RO.-(SP) 
MOV Rl.-(SP) 
MOV R2.-(SP) 







1 


READ AN ASCIZ LINE 


MOV 


(SP)».RO 




GET ADDRESS OF 1ST CHARACTER 


MOV 


R0.5$ 


• 


AND SAVE IT 


CLR 


Rl 


• 


CLEAR DATA UORD 


CLR 


R2 






MOVB 


(R0)».-(SP) 


ff 


PICKUP THIS CHARACTER 


BEQ 


3* 


f 


IF ZERO GET OUT 


CMPB 


#'0.(SP) 


f 


MAKE SURE THIS CHARACTER 


B6T 


4$ 


S 


IS AN OCTAL DIGIT 


CMPB 


#'7.(SP) 






BLT 


4$ 






ASL 


Rl 


s.*2 


ROL 


R2 






ASL 


Rl 


■ 


♦4 


ROL 


R2 






ASL 


Rl 


■ 


♦8 


ROL 


R2 






BIC 


*tC7.CSP) 


• 


STRIP THE ASCII JUNK 


ADD 


(SP)*.R1 


I 


ADD IN THIS DIGIT 


BR 


2$ 


i 


LOOP 


TST 


(SP)* 




CLEAN TERMINATOR FROM STACK 


MOV 


R1.12(SP) 


* 


SAVE THE RESULT 


MOV 


R2.IHI0CT 






POP 


R2.R1.ro 







(SP)' 
(RO) 



CRF 
0 

MSG062 

.MSG062 

CRF 

MSG063 
.MSG063 



RETURN 

CLEAN PARTIAL FROM STACK 

SET A TERMINATOR 

TYPE UP THRU THE BAD CHAR. 



! INPUT MUST BE A 



MOV (SP)*.R2 
MOV (SP)*.R1 
MOV (SP)».RO 



:N OCTAL 



E15 
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ROUTINE READ AN OCTAL NUMBER FROM THE TTY 



SEQ 0393 



13972 056140 

056140 104401 070027 



13973 
13974 
13975 
13976 
13977 
13978 
13979 
13980 
13981 
13982 
13983 
13984 
13985 
13986 
13987 
13988 
13989 
13990 
13991 



056144 
056146 



13992 
13993 
13994 
13995 
13996 
13997 
13998 
13999 
14000 
14001 
14002 
14003 
14004 
14005 
14006 
14007 
14008 
14009 
14010 
14011 
14012 
14013 
14014 
14015 
14016 
14017 
14018 
14019 
14020 
14021 
14022 



056150 

056152 

056160 

056160 

056162 

056164 

056166 

056170 

056172 

056176 

056200 

056202 

056206 

056210 

056212 

056214 

056216 

056222 

056224 

056230 

056232 

056236 

056240 

056242 

056244 

056246 

056250 

056252 

056254 

056260 

056262 

056264 

056266 

056270 

056272 

056274 

056300 



000724 
000000 



011646 
016666 

010046 

010146 

010246 

104412 

012600 

010037 

005046 

005002 

122710 

001001 

112002 

112001 

001424 

122701 

003032 

122701 

002427 

032716 

001024 

006316 

011646 

006316 

006316 

062616 

102416 

162701 

060116 

102412 

000752 

005702 

001401 

005416 

012666 



♦HIOCT: 



.DSA8L CRF 

TYPE MSG064 ; NUMBER 

TYPEIT .MSG064 

.DSABL CRF 

BR li ::TRY AGAIN 

.UORD 0 :: HIGH ORDER BITS GO HERE 

.SBTTL ROUTINE READ A DECIMAL NUMBER FROM THE TTY 



♦THIS ROUTINE UILL READ A DECIMAL (ASCII) NUMBER FROM THE TTY AND 
♦CHANGE IT TO BINARY. IF TOO MANY CHARACTERS OR ANY ILLEGAL CHARACTERS 
♦ARE READ A "?" FOLLOWED BY A CARRIAGE RETURN-LINE FEED UILL BE TYPED. 
♦THE COMPLETE NUMBER MUST BE RETYPED. THE INPUT IS TERMINATED BY THE 
♦USER TYPING A CARRIAGE RETURN. THE RANGE OF THE INPUT NUMBER IS 
♦POSITIVE 32767 TO NEGATIVE 32768. 
♦CALL : 

♦ RDDEC :iREAD A DECIMAL NUMBER 

♦ RETURN HERE NUMBER IS ON TOP OF THE STAC< 



000004 



$RDDEC: MOV 
000002 MOV 
PUSH 



1«: 



056316 

000055 

000060 
000071 
170000 



2i: 



000060 



000012 



3$: 
4$: 



RDLIN 

MOV 

MOV 

CLR 

CLR 

CMPB 

BNE 

MOVB 

MOVB 

BEQ 

CMPB 

BGT 

CMPB 

8LT 

BIT 

BNE 

ASL 

MOV 

ASL 

ASL 

ADD 

BVS 

SUB 

ADD 

BVS 

BR 

TST 

BEQ 

NEG 

MOV 

POP 



(SP).-(SP) 

4(SP).2(SP) 

R0.R1.R2 



(SP)*.RO 
R0.6I 

-(SP) 
R2 

#'-.(R0) 
2i 

(R0)*.R2 
(R0)*.R1 
3* 

#'0.R1 
5* 

0'9.R1 
5* 

#tC7777.(SP) 
5* 

(SP) 

(SP).-(SP) 

(SP) 

(SP) 

(SP)*.(SP) 
5$ 

#'0,R1 

Rl.CSP) 

5$ 

2i 

R2 

4$ 

(SP) 

(SP)*.12(SP) 
R2.R1.ro 



Si PROVIDE SPACE FOR 
isTHE INPUT NUMBER 



READ AN ASCIZ LINE 
ADDRESS OF 1ST CHAR. 
SAVE INCASE OF BAD INPUT 
CLEAR DATA UORD 
SIGN SET POSITIVE 
SEE IF A MINUS SIGN UAS TYPED 
BR IF NO MINUS SIGN 
SAVE FOR LATER USE 
PICKUP THIS CHARACTER 
GET OUT IF ZERO 
MAKE SURE THIS CHARACTER 
IS A DIGIT BETWEEN 0 £ 9 



DON'T LET NUMBER GET TO BIG 
BR IF NUMBER UOULD OVERFLOW 
♦2 

SAVE FOR LATER 

♦4 

♦8. 

♦10. 

OVERFLOW ISN'T ALLOWED 
STRIP AWAY THE ASCII JUNK 
ADD IN THIS DIGIT 
OVERFLOW ISN'T ALLOWED 
LOOP 

CHECK IF NUMBER IS NEG 
BR IF NO 

YES- -NEGATE THE NUMBER 
SAVE THE RESULT 



MOV RO,-(SP) 
MOV Rl.-(SP) 
MOV R2.-(SP) 
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SEQ 0394 



056300 


012602 












MOV 


056302 


012601 












MOV 


056304 


012600 












MOV 


14023 056306 


000002 






RTI 




i i RETURN 




14024 
















14025 056310 


005726 




5*: 


TST 


(SP)* 


;; CLEAN PARTIAL NUMBER 


FROM STACK 


14026 056312 


105010 






CLRB 


(RO) 


sjSET A TERMINATOR 




14027 056314 








TYPE 




;!TYPE THE INPUT UP TQ 


BAD CHAR. 


056314 


104401 






TYPEIT 
. OSABL 


CRF 






14028 056316 


000000 




6$: 


.UORO 


0 


5 : POINTER GOES HERE 
; INPUT MUSST BE A 




14029 056320 








TYPE 


MSG062 




ABA V 

056320 


104401 


067776 




TYPEIT 
.OSABL 


, nSG062 
CRF 




11030 056324 








TYPE 


MSG065 


; DECIMAL 








u two 1 




TYOrTT 
1 Trtl 1 

.OSABL 


CRF 




14031 056330 








TYPE 


MSG064 


: NUMBER 




056330 


104401 


070027 




TYPEIT 
.OSABL 


.MSG064 
CRF 






14032 056334 


000714 






BR 


1$ 


::TRY AGAIN 





G15 



CVHJAAO nSVll-J MEnORY OIAG. 
ROUTINE SAVE AND RESTORE RO-RS 



14034 

14035 

14036 

14037 

14038 

14039 

14040 

14041 

14042 

14043 

14044 

14045 

14046 

14047 

14048 

14049 

14050 

14051 

14052 
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.SBTTL ROUTINE SAVE AND RESTORE R0-R5 



SEQ 0395 



14053 
14054 
14055 
14056 
14057 
14058 
14059 
14060 
14061 
14062 
14063 
14064 
14065 
14066 
14067 



14068 



056336 
056336 
056336 
056340 
056342 
056344 
056346 
056350 
056352 
056356 
056362 
056366 
056372 



056374 
056374 
056400 
056404 
056410 
056414 
056414 
056416 
056420 
056422 
056424 
056426 
056430 



010046 
010146 
010246 
010346 
010446 
010546 
016646 
016646 
016646 
016646 
000002 



012666 
012666 
012666 
012666 

012605 
012604 
012603 
012602 
012601 
012600 
000002 



000022 
000022 
000022 
000022 



000022 
000022 
000022 
000022 



*SAVE R0-R5 
*CALL: 

* SAVREG 

*UPON RETURN FROM tSAVREG THE STACK UILL LOOK LIKE: 

*T0P---(«16) 

* ♦2---(»18) 

* ♦4---R5 

* ♦6---R4 

* ♦8---R3 
♦♦10---R2 
♦♦12---R1 
♦♦14---R0 



ISAVREG: 



PUSH R0.R1.R2.R3,R4.R5 



MOV 
MOV 
MOV 
MOV 
RTI 

;*RESTORE R0-R5 
; *CALL : 

i * RESREG 
IRESREG: 

MOV 
MOV 
MOV 
MOV 
POP 



22(SP),-(SP) 
22(SP).-(SP) 
22(SP).-(SP) 
22(SP),-(SP) 



SAVE PS OF MAIN FLOW 
SAVE PC OF MAIN FLOW 
SAVE PS OF CALL 
SAVE PC OF CALL 



MOV RO.-(SP) 
MOV Rl.-(SP) 
MOV R2.-(SP) 
MOV R3,-(SP) 
MOV R4.-(SP) 
MOV R5.-(SP) 



(SP)*.22(SP) 
(SP)*.22(SP) 
(SP)».22(SP) 
(SP)».22(SP) 
R5.R4.R3,R2.R1,R0 



RESTORE PC OF CALL 
RESTORE PS OF CALL 
RESTORE PC OF MAIN FLOW 
RESTORE PS OF MAIN FLOW 



MOV (SP)< 
MOV (SP). 



RTI 



.R5 
.R4 

MOV (SP)».R3 
MOV (SP)*.R2 
MOV (SP)»,R1 
MOV (SP)».RO 
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ROUTINE RAWOM NUMBER GENERATOR 
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Page 445 



SEQ 0396 



14070 
14071 
14072 
14073 
14074 
14075 
14076 
14077 
14078 
14079 
14000 
14001 



14002 
14083 
14084 
14085 
14086 
14087 
14080 
14089 
14090 
14091 
14092 
14093 
14094 
14095 
14096 



14097 



056432 
056432 
056434 
056436 
056440 
056444 
056450 
056454 
056456 
056460 
056462 
056466 
056470 
056474 
056500 
056502 
056506 
056512 
056516 
056516 
056520 
056522 
056524 



010046 
010146 
010246 
013700 
01370J 
012702 
006300 
006101 
077203 
063700 
005501 
063701 
062700 
005501 
062701 
010037 
010137 

012602 
012601 
012600 
000207 



.SBTTL ROUTINE RANDOM NUMBER GENERATOR 



002604 
002602 
000007 



002604 

002602 
001057 

047401 
002604 
002602 



*************************** 



*THIS ROUTir€ IS A DOUBLE PRECISION PSEUDO RANDOM NUMBER GENERATOR 
*UITH A RANGE OF 0 TO 2**(*33)-l. 



*CALL: 



CALL 
RETURN 



$RAND 



JRAND: PUSH R0.Rl.R2 



1^ 



MOV 
MOV 
MOV 
ASL 
ROL 
SOB 
ADD 
ADC 
ADD 
ADD 
ADC 
ADD 
MOV 
MOV 
POP 



RETURN 



SEEDLO.RO 

SEEOHI.Rl 

*7.R2 

RO 

Rl 

R2.1* 

SEEDLO.RO 

Rl 

SEEDHI.Rl 

01057.ro 

Rl 

047401. Rl 
RO.SEEDLO 
Rl.SEEDHI 
R2.R1.ro 



CALL THE ROUTINE 
RETURN HERE THE RANDOM 
NUMBER UILL BE IN 
$HINUM.*LONUM 



SET RO WITH LOU 

SET Rl WITH HIGH 

SET SHIFT COUNT 

: SHIFT RO LEFT AND 

: ROTATE CARRY INTO Rl AND 

ADD NUMBER TO MAKE X 129 

! PROROGATE CARRY 

ADD NUMBER TO MAKE X 129 

ADD LOU CONSTANT 

PROROGATE CARRY 

ADD HIGH CONSTANT 
SAVE RO 
SAVE Rl 



MOV RO.-{SP) 
MOV R1.-{SP) 
MOV R2.-(SP) 



MOV (SP)*.R2 
MOV (SP)..R1 
MOV (SP)».RO 
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SEQ 



14100 

14101 

14102 

14103 

14104 

14105 

14106 

14107 

14108 

14109 

14110 

14111 

14112 

14113 

14114 

14115 

14116 

14117 

14118 

14119 

14120 

14121 

14122 

14123 

14124 

14125 

14126 

14127 

14128 

14129 

14130 

14131 

14132 

14133 

14134 

14135 

14136 

14137 

14140 



056526 
056530 
056534 
056540 
056544 
056550 
056552 
056554 
056556 
056560 
056562 
056564 
056566 
056570 
056572 
056576 
056600 
056602 
056604 
056606 
056610 
056612 
056614 
056616 
056620 
056622 
056626 
056630 



104415 

016601 
012705 
012704 
012703 
012100 
012101 
005002 
110245 
010002 
005304 
003007 
001405 
005205 
010566 
104416 
000207 
006203 
006001 
006000 
006001 
006000 
006001 
006000 
040302 
062702 
000753 
000016 
056634 



000002 
056645 
000014 
177770 



000002 



000060 





.SBTTL 


ROUTINE DOUBLE LENGTH BINARY TO OCTAL ASCII CONVERT 






:^THIS 


ROUTINE 


UILL CONVERT A 32- 


BIT UNSIGNED BINARY NUMBER TO AN 


:*UNSIGNEO OCTAL ASCIZ NUMBER. 




: ♦CALL 








; ♦ 


nov 


ADMTD /CO') 
If Kri 1 K , - ^ Or J 






; ♦ 


CALL 


< AR3A 

fUDcU , 




rfll 1 TMP OnilTTMP 
UHLL 1 nc nUU 1 Arte 


; * 


Of Tl lOkl 

Kt lUHN 






TMP annopcc hp thp ptrct AcrT7 thap tc ruu 










CAVP Al 1 OPnCTPDC 




nov 


C\Or J ,H1 




Dirttiio TMP PHTNTPD TO 1 nu unpo 




nov 






OnTMTPO TO HAT A TARl P 




MAU 

nuv 


<»12..R4 




nn PI PuPM TMADArTPPC 

UU CwCvCn cnnnni* 1 CnO 




MAU 

nuv 


Vty, 1 , no 




MA CI/ 




HA VI 

nuv 


f Dl 1* DA 




1 nuPP unPD 

L.UMCn MVJnU 




nuv 


f Dl "4* 01 
V nl J* 




HTCH unpn 

n^on m\jnu 




n o 






■TPPMTNATnP 


X* : 


MAUD 

nuvtj 


Dp -fPS'i 
nc ■ V n J J 




■ PUT THARArTPR TN DATA TABl F 




MAU 

nuv 


R0.R2 








ncr 

UCL 


R4 








Du 1 


3* 




RR TF NOT THF I AST OTGTT 




DCU 


2* 




RR TF TT T<; THF I AST DIGIT 






R5 




• All DTGTT*; DONF-ADJUST POINTER FOR FIRST 




MAU 

nuv 


R5.2(SP) 




•ASrT7 THAR F PUT TT ON THF STACK 








PPSTHRP Al 1 RF(;TSTFRS 




OFll IDM 






■RFTURN TO USFR 




MO" 


R3 




PnSTTTON THF MASK FOR THF I AST DIGIT 


3$ : 


RQR 


Rl 




■POSITION THF BTNARY NUMBER FOR 




ROR 


RO 




! THE NEXT OCTAL DIGIT 




ROR 


Rl 






ROR 


RO 






ROR 


Rl 






ROR 


RO 






SIC 


R3.R2 




J MASK OUT ALL JUNK 




'ADD 


«'0.R2 




;MAKE THIS CHAR. ASCII 




BR 


li 




;G0 PUT IT IN THE DATA TABLE 


JOCTVL 


: .REPT 


14. 




; RESERVE DATA TABLE 


♦0CT8= 


*0CTVL»4 




POINTER TO 11 DIGIT NUMBER 



J15 



CVttwAAO MSVll 
TABLES 



•J MCHORY 01 AG. 



14142 

14143 

14144 

14145 

14146 

14147 

14148 

14149 

14150 

14151 

14152 

14153 

14154 

14155 

14156 

14157 

14156 

14159 

14160 

14161 

14162 

14163 

14164 

14165 

14166 

14167 

14168 

14169 

14170 

14171 

14172 

14173 

14174 

14175 

14176 

14177 

14178 

14179 

14180 

14181 

14182 

14183 

14164 

14165 

14166 

14167 

14188 

14189 

14190 

14191 

14192 

14193 

14194 

14195 



056646 
056646 
056650 
056652 
056654 
056656 
056660 
056662 
056664 
056666 
056666 



056667 

056670 
056672 
056674 



000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 

000 



000 

000101 
000000 
000000 



056676 
056677 



001 
004 



056700 177776 



056702 
056703 
056704 
056706 
056707 
056710 
056712 
056713 
056714 
056716 
056720 
056722 
056724 

056726 
056730 
056732 



000 
000 
000000 
000 
000 
000000 
000 
000 
000000 
000000 
000000 
000000 
000000 

000000 
000000 
000000 
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.SBTTL TABLES 



SEQ 0396 



♦MAIL: 
♦MSGTY 
IFATAL 
ITESTN 
*PASS: 
IDEVCT : 
4UNIT: 
$MSGAD: 
♦MSGLG: 
*ETABLE 
»ENV: 
NOTE: 



SBTTL APT MAILBOX ETABLE 



$SUREG: 

$USUR: 

ICPUOP: 

!* 
!* 

$MAMS1: 

*MTYP1: 

!* 

!* 

!* 

!♦ 

$ MAORI : 
:* 

♦MAMS2 
*MTYP2 
$MA0R2 
JMAMS3 
♦MTYP3 
$MA0R3 
yMAMS4 
JMTYP4 
$MA0R4 
WECTl 
$VECT2 
$BASE: 
♦DEVM: 



$C0U1 
KDU2 
♦00U7 



.UORD 
.UORD 
.UORD 
.UORD 
.WORD 
.UORD 
.UORD 
.UORD 

.BYTE 
IF BIT 
ENDING 



0 
0 
0 
0 

0 
0 
0 

0 

0 
07 
AT 



EACH TYPE 



♦ENVM: .BYTE 



.UORD 
.UORD 
.UORD 



101 

0 



.BYTE 
.BYTE 



.BYTE 
.BYTE 
.UORD 
.BYTE 
.BYTE 
.UORD 
.BYTE 
.BYTE 
.UORD 
.UORD 
.UORD 
.UORD 
.UORD 



0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 



. UORD 0 
.UORD 0 
.UCRD 0 



MESSAGE TYPE CODE 
FATAL ERROR NUMBER (ERROR PC) 
TEST PATTERN NUMBER 
PASS COUNT 
DEVICE COUNT 
I/O UNIT NUMBER 
MESSAGE ADDRESS 
MESSAGE LENGTH 
APT ENVIRONMENT TABLE 

ENVIRONMENT BYTE ;SET TO A 1 FOR APT AUTO MODE 

IS SET IN »ENVM THE TABLE BELOU (BEGINNING AT iMAMSl AND 
♦MADR4) MUST BE FILLED IN TO INDICATE THE PROPER AMOUNT OF 
OF MEMORY. 

ENVIRONMENT MODE 

BIT7(200)-USE APT SIZE INFO iBIT5(40)>N0 CONSOLE 
:APT SUITCH REGISTER 
USED TO LIMIT THE NUMBER OF PASSES 
:CPU TYPE. OPTIONS 
BITS 15-11-CPU TYPE 

11/04=01 . 11/05=02. 11/20=03. ll/40«04. ll/45«05 
11/70=06. PDQ=07,Q«10 
BIT 10=REAL TIME CLOCK 
BIT 9=FL0ATING POIN"' PROCESSOR 
BIT 8= MEMORY MANAGEMENT 
;;HIGH ADDRESS. M.S. BYTE sDEFAULT = 64K 
:;MEn. TYPE.BLKOl 
MEM. TYPE BYTE -- (HIGH BYTE) 
900 NSEC C0RE=001 
300 NSEC BIPOLAR=002 
PARITY M0S»003 
ERROR CORRECTING M0S=004 
ADDRESS. 8LK01 

MEM. LAST ADDR.=3 BYTES. THIS UORD AND LOU OF "TYPE" ABOVE 
HIGH ADDRESS. M.S. BYTE 
MEM.TYPE.BLK02 
MEM. LAST ADDRESS. BLK#2 
HIGH ADDRESS. M.S. BYTE 
MEM. TYPE. BLK03 
MEM. LAST ADDRESS. BLK«3 
HIGH ADDRESS. M.S. BYTE 
MEM. TYPE. BLK04 
MEM. LAST ADDRESS. BLK»4 
INTERRUPT VECTOROl.BUS PRIORITYOl 
INTERRUPT VECT0R02BUS PRIORITY^ 
BASE ADDRESS OF EQUIPMENT UNDER TEST 
DEVICE MAP 



:UFD MODE FLAG 1-UFD MODE 



.WORD 177776 ;;HIGH 



CVMJAAO MSVll-J MEMORY OIAG. 
APT MAILBOX- ET ABLE 

14197 
14190 
14199 
14200 
14201 
14202 
14203 
14204 
14205 

14206 056734 177777 

14207 056736 177777 

14208 056740 177777 

14209 056742 177777 

14210 056744 177777 

14211 056746 177777 
14215 056750 

14216 
14217 
14218 

14219 056750 

14220 056750 000000 

14221 056752 056646 

14222 056754 000043 

14223 056756 001274 

14224 056760 000000 

14225 056762 000041 



K15 
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SEQ 0399 



THE FOLLOWING LOCATIONS SPECIFY UHICH PATTERNS 
ARE TO BE RUN FOR PARTICULAR MEMORIES 

REFERENCE THE TABLE LISTED BELOU TO RElATE BITS TO PATTERNS. 
BITO SET UILL RUN THE FIRST ENTRY IN THE TABLE. BITO SET 
IN THE SECOND WORD UILL RUN THE 17TH ENTRY IN THE TABLE . . . 



NOTE** NULL TESTS DO NOT TAKE ANY TIME 



$DDUO: 


.UORD 


177777 


:ECC CSR TESTS 


$0DU1: 


.UORD 


177777 


;ECC CSR TESTS 


«DDU2: 


.UORD 


177777 


:ECC PATTERNS 


«DDU3: 


.UORD 


177777 


:ECC PATTERNS 


«00U4 : 


.UORD 


177777 


; PARITY PATTERNS 


$00U5: 


.UORD 


177777 


; PARITY PATTERNS 


iETEND: 









; FIELD 



SERVICE 
177777 
177777 
103777 
177777 
003777 
177774 



VALUE 



TABLE 
TABLE 
TABLE 
TABLE 
TABLE 
TABLE 



MKCSRT 

MKCSRT 

MKPAT 

MKPAT 

MJPAT 

MJPAT 



5 SETUP APT PARAMETER BLOCK AS DEFINED IN THE APT-PDPll DIAGNOSTIC 
; INTERFACE SPEC. 



$APTHD: 

JHIBTS: .UORD 

$MBADR: .UORD 

nSTM: .UORD 

♦PASTM: .UORD 

$UNITM: .UORD 
.WORD 



0 

♦ MAIL 
35. 
700. 
0. 

*ETEND *MAIL/2 



TUO HIGH BITS OF 18 BIT MAILBOX ADDR. 
ADDRESS OF AFT MAILBOX (BITS 0-15) 
RUN TIM OF LONGEST TEST 

RUN TIME IN SECS. OF 1ST PASS ON 128K (QUICK VERIFY) 
EXTRA RUN TIME OF A PASS FOR EACH ADDITIONAL 12eK (QV) 
LENGTH MAILBOX ETABLE(UORDS) 



LIS 



CVnjAAO MSVll-J MEHORY 01 AG. 
ROUTINE TRAP DECODER 



14227 
14228 
14229 
14230 
14231 
14232 
14233 
14234 
14235 
14236 
14237 
14238 
14239 
14240 
14241 
14242 
14243 
14244 
14245 
14246 
14247 
14248 
14249 
14250 
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.SBTTL ROUTINE TRAP DECODER 



SEQ 0400 



♦THIS ROUTINE WILL PICKUP THE LOWER BYTE OF THE "TRAP" INSTRUCTION 
♦AND USE IT TO INDEX THROUGH THE TRAP TABLE FOR THE STARTING ADDRESS 
♦OF THE DESIRED ROUTINE. THEN USING THE ADDRESS OBTmINFO I" WILL 
♦GO TO THAT ROUTINE. 



056764 


010046 




♦TRAP: 


MOV 


RO.-(SP) 




SAVE RO 




016600 

V A WWW 


000002 

WWWWWfc 




MOV 


2(SP).R0 




GET TRAP ADDRESS 


056772 


005740 






TST 


-(RO) 




BACKUP BY 2 


056774 


111000 

AAA WWW 






MOVB 


(RO),RO 




GET RIGHT BYTE OF TRAP 


056776 


006300 






ASL 


RO 




(POSITION FOR INDEXING 


057000 


016000 


057026 




MOV 


«TRPAD(RO).RO 




INDEX TO TABLE 


057004 


000200 






RTS 


RO 




GO TO ROUTINE 








;;THIS 


IS USE 


TO HANDLE THE TETPRI" MACRO 


057006 


011646 




$TRAP2: 


MOV 


(SP).-(SP) 




MOVE THE PC DOWN 


057010 


016666 


000004 000002 




MOV 


4(SP).2(SP) 




MOVE THE PSW DOWN 


057016 


000002 






RTI 






RESTORE THE PSU 


057020 






$NOTRAP 


:TYPE 


MSG006 J UNDEFINED TRAP INSTRUCTION 


057020 


104401 


065507 




TYPEIT 


,MSG006 












.DSABL 


CRF 




057024 


000000 




$HALT2: 


HALT 







M15 



CVMJMAO MSVll-J MEMORf DIAG. 
TRAP TABLE 

14254 
14255 
14256 
14257 
14258 
14259 
14260 

14261 057026 057006 

14262 057030 047122 

14263 057032 054102 

14264 057034 054056 

14265 057036 057020 

14266 057040 054304 

14267 057042 057020 
14268 

14269 057044 054704 

14270 057046 054530 
14271 

14272 057050 055264 

14273 057052 055414 

14274 057054 0S6000 

14275 057056 056150 
14276 

14277 057060 056336 

14278 057062 056374 
14279 

14260 057064 034202 

14281 057066 034212 

14282 057070 034222 
14283 
14284 
14285 

14286 057074 034232 

14287 057076 034256 
14288 

14289 057100 034274 

14290 057102 034370 
14291 

14292 057104 047456 

14293 057106 047504 

14294 057110 047532 

14295 057112 047562 

14296 057114 047644 

14297 057116 047666 

14298 057120 047716 

14299 057122 047736 

14300 057124 047760 

14301 057126 050000 

14302 057130 050022 

14303 057132 050044 

14304 0S7134 050064 

14305 057136 050102 

14306 057140 050120 

14307 057142 050140 
14306 057144 050156 

14309 057146 050174 

14310 057150 044756 



057072 036310 
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.SBTTL TRAP TABLE 

;«THIS TABLE CONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALLED 
s*BY THE "TRAP- INSTRUCTION. 



SEQ 0401 



ITRPAO: 



ROUTINE 

.UORD ITRAP2 
♦TYPE :CALL-TYPEIT 
♦TYPOC :CALL-TYPOC 
♦TYPOS :CALL«TYPOS 
♦NOTRAPsiTYPON iCALL= 
♦TYPDS : CALL-TYPOS 
$N0TRAPs$TYPBN ;CALL' 



$GTSUR 
ICKSUR 

IROCHR 
iRDLIN 
iROOCT 
IROOEC 



sCALL-GTSUR 
;CALL-CKSUR 

CALL-ROCHR 
CALL-ROLIN 
CALL-ROOCT 
CALL«R00EC 



$SAVREG iCALL-SAVREG 
IRESREG :CALL-RESREG 



TRAP*1(104401) TTY TYPEOUT ROUTINE 

TRAP»2( 104402) TYPE OCTAL NUMBER (WITH LEADING ZEROS) 

TRAP»3( 104403) TYPE OCTAL NUMBER (NO LEADING ZEROS) 

TYPON TRAP»4( 104404) TYPE OCTAL NUMBER (AS PER LAST CALL)" 

TRAP ♦5(104405) TYPE DECIMAL NW1BER (WITH SIGN) 

TYPBN TRAP»6(104406) TYPE BINARY (ASCTI) NUMBER 

TRAP*7( 104407) GET SOFT-SUR SETTING 

TRAP*10( 104410) TEST FOR CHANGE IN SQFT-SUR 

TRAP»11(104411) TTY TYPEIN CHARACTER ROUTINE 

TRAP*12( 104412) TTY TYPEIN STRING ROUTINE 

TRAP»13(104413) READ AN OCTAL NUMBER FROM TTY 

TRAP»14( 104414) READ A DECIMAL NUMBER FROM TTY 

TRAP*15(104415} SAVE R0-R5 ROUTINE 

TRAP* 16(104406) RESTORE R0-R5 ROUTINE 



IKERNEL i CALL-KERNEL TRAP*17(104417} ENTER KERNEL MODE 
$ENERGIZE:CALL-ENERGIZETRAP*20(104420) TURN ON MEMORY MANAGEMENT & TRAPS 
tDEENERGI;CALL-DEENERGITRAP«21(104421) TURN OFF MEMORY MENAGEMENT L TRAPS 



IKMAP 

ICACHN 
ICACHF 

ILOADC 
$READC 

♦PEROl 
$PER02 
♦PER03 
$PER04 
♦PER07 
♦PERIO 
♦PERU 
$PER12 
$PER13 
$PER14 
♦PER15 
IPER16 
♦PERI 7 
♦PER20 
♦PER21 
$PER22 
♦PER23 
♦PER24 
$PER25 



;CALL-KMAP 

sCALL-CACHON 
iCALL-CACHOFF 

;CALL-LOADCSR 
;CALL-READCSR 

CALL-PERROl 
CALL«PERR02 
CALL-PERR03 
CALL-PERR04 
CALL»PERR07 
jCALL-PERRlO 
CALL-PERRll 
CALL«PERR12 
CALL-PERR13 
CALL-PERR14 
CALL-PERR15 
CALL-PERR16 
CALL-PERR17 
CALL*PERR20 
CALL»PERR21 
CALL«PERR22 
CALL«PERR23 
CALL=PERR24 
CALL>PERR25 



TRAP»22( 104422) MAP KERNEL 1 TO 1 

TRAP«23( 104423} TURN CACHE ON 
TRAP*24(104424) TURN CACHE OFF 

TRAP»25( 104425) LOAD CORRECT CSR 
TRAP»26( 104426) READ CORRECT CSR 

TRAP»27( 104427) PROGRAM DETECTED ERROR 
TRAP»30( 104430) PROGRAM DETECTED ERROR 
TRAP ♦SI (104431) PROGRAM DETECTED ERROR 
TRAP»32( 104432) PROGRAM DETECTED ERROR 
TRAP»33( 104433) PROGRAM DETECTED ERROR 
TRAP ♦34(104434) PROGRAM DETECTED ERROR 
TRAP*35( 104435) PROGRAM DETECTED ERROR 
TRAP«36(104436) PROGRAM DETECTED ERROR 
TRAP»37( 104437) PROGRAM DETECTED ERROR 
TRAP »40( 104440) PROGRAM DETECTED ERROR 
TRAP»41( 104441) PROGRAM DETECTED ERROR 
TRAP*42( 104442) PROGRAM DETECTED ERROR 
TRAP 443(104443) PROGRAM DETECTED ERROR 
TRAP*44(104444) PROGRAM DETECTED ERROR 
TRAP*45(104445) PROGRAM DETECTED ERROR 
TRAP *46( 104446) PROGRAM DETECTED ERROR 
TRAP»47( 104447) PROGRAM DETECTED ERROR 
TRAP ♦50(104450) PROGRAM DETECTED ERROR 
TRAP 4 51 (104451) PROGRAM DETECTED ERROR 



CVMJAAO MSVll-J MEMORY OIAG. 
TRAP TABLE 



N15 

MACRO VOS.Olb Friday 15-Feb-85 16:10 Page 45?-l 



SEQ 040. 



14311 057152 

14312 057154 

14313 057156 

14314 057160 
14515 057162 

14316 057164 

14317 057166 

14318 057170 

14319 057172 

14320 057174 

14321 057176 

14322 057200 

14323 057202 

14324 057204 
14325 

14326 057206 

14327 057210 

14328 057212 

14329 057214 

14330 057216 

14331 057220 

14332 057222 

14333 057224 

14334 057226 

14335 057230 

14336 ')S7232 

14337 0"7234 

14338 05^236 

14339 057240 

14340 057242 

14341 057244 

14342 057246 

14343 057250 

14344 057252 

14345 057254 

14346 057256 

14347 057260 

14348 057i:62 

14349 057264 

14350 057266 

14351 057270 

14352 057272 



050364 
050404 
045204 
050574 
050672 
050740 
051020 
051052 
051106 
051136 
051142 
057020 
057020 
057020 

034570 
034604 
034616 
034632 
034672 
034714 
034734 
035050 
035100 
035214 
035244 
035256 
035266 
035302 
034644 
034660 
034410 
035362 
035412 
035662 
035700 
057020 
057020 
057020 
057020 
057020 
057020 



$PER26 

♦PER27 

*PER30 

*PER31 

♦PER32 

*PER33 

IPER34 

*PER35 

)PER36 

♦PER37 

IPER40 

$NOTRAP 

$NOTRAP 

< NOT RAP 



CALL«PERR26 
CALL-PERR27 
CALL-PERR30 
CALL-PERR31 
CALL=PERR32 
CALL-PERR33 
CALL-PERR34 
CALL-PERR35 
CALL-PERR36 
CALL-PERRS7 
CALL-PERR40 
CALL-PERR41 
CALL-PERR42 
CALL-PERR43 



lECCOIS sCALL-ECCOIS 

IECC10IS:CALL-ECC10IS 

♦ECCINITsCALL-ECCINIT 

lECClINIT :CALL-ECC1INIT 

$CBCSR :CALL-CBCSR 

♦CBICSR ;CALL-CB1CSR 

iUASSBE iCALL-UASSBE 

lUASlSBEsCALL-UASlSBE 

$UASOBE iCALL-UASOBE 

$UAS10BE:CALL-UAS10BE 

tCLRCSR :CALL-CLRCSR 

tCLRlCSRiCALL-CLRlCSR 

♦CHKDIS :CALL"CHKOIS 

*CHK1DIS:CALL-CHK1DIS 

JENASBE sCALL-ENASBE 

«ENAlSBEiCALL-ENAlSSE 

♦TSTRD sCALL-TSTREAD 

^INVALIDS CALL-INVALID 

lERRGEN :CALL-ERRGEN 

ICBREG iCALL-CBREG 

4SYNREG iCALL-SYNREG 

«NOTRAP 

$NOTRAP 

INOTRAP 

INOTRAP 

$NOTRAP 

INOTRAP 



TRAP 
TRAP 
TRAP 
TRAP 
TRAP 
TRAP 
TRAP 
TRAP 
TRAP 
TRAP 
TRAP 
TRAP 
TRAP 
TRAP 

TRAP 
TRAP 
TRAP 
TRAP 
TRAP 
TRAP 
TRAP 
TRAP 
TRAP 
TRAP 
TRAP 
TRAP 
TRAP 
TRAP 
TRAP 
TRAP 
TRAP 
TRAP 
TRAP 
TRAP 
TRAP 



52(104452) 
53(104453) 
54(104454) 
55(104455) 
56(104456) 
57(104457) 
60(104460) 
61(104461) 
62(104462) 
63(104463) 
64(1044M) 
65( 104463) 
66(104466) 
67(104467) 



PROGRAM 
PROGRAM 
PROGRAM 
PROGRAM 
PROGRAM 
PROGRAM 
PROGRAM 
PROGRAM 
PROGRAM 
PROGRAM 
PROGRAM 
PROGRAM 
PROGRAM 
PROGRAM 



DETECTED 
DETECTED 
DETECTED 
DETECTED 
DETECTED 
DETECTED 
DETECTED 
DETECTED 
DETECTED 
DETECTED 
DETECTED 
DETECTED 
DETECTED 
DETECTED 



ERROR 
ERROR 
ERROR 
ERROR 
ERROR 
ERROR 
ERROR 
ERROR 
ERROR 
ERROR 
ERROR 
ERROR 
ERROR 
ERROR 



iilLCaREV B 
lalLCiREV B 



70(104470) DISABLE ECC ON ALL CSR'S 
71(104471) DISABLE ECC ON 1 SELECTED CSR 
72(104472) INITIALIZE ALL MKll CSR'S 
73(104473) INITIALIZE 1 SELECTED MKll CSR 
74(104474) WRITE GENERATED CHECKBITS IN ALL CSR'S 
75(104475) WRITE GENERATED CHECKBITS IN 1 SELECTED CSR 
76(104476) WAS THERE A SBE ON ANY CSR? 

A SBE ON 1 SELECTED CSR? 
A DBE ON ANY CSR? 
A DBE ON 1 SELECTED CSR? 



77(104477) WAS THERE 
100(104500) WAS THERE 
101 ( 104501 )WAS THERE 
102( 104502 )CLEAR ALL CSR'S 
103( 104503 )CLEAR 1 SELECTED CSR 

104( 104504 )DISABLE ECC t WRITE CKBITS FROM ALL CSR S 
105( 104505 )DISABLE ECC t WRITE CKBITS FROM 
106( 104506 )ENABLE TRAPS ON SBE' 
107( 104507 )ENABLE TRAPS ON SBE' 

110( 104510 )TEST LOC (Rl) £ TST FOR SBE (WITHOUT FETCHES 
IIK 104511 )INVALIDATE BACKGROUND PATTERN ON BANK 
112( 104512 )TEST ERROR ADDRESS 
113( 104513 )ENABLE CHECK BIT REGISTER 
114( 104514 )ENABLE SYNDROME BIT REGISTER 



1 CSR 
S FROM ALL CSR'S 
S FROM 1 SELECTED CSR 



14355 



17777f> 



ST 



177776 



: STATUS REGISTER 



CVMJAAO MSVll-J rCrtORY 01 AG. 
TABLE ERROR POINTER 

14358 
14359 
14360 
14361 
14362 
14363 
14364 
14365 
14366 
14367 
14368 
14369 
14370 
14371 

14372 057274 

14373 057274 061762 

14374 057276 064172 

14375 057300 060320 

14376 057302 060701 
14377 

14378 057304 060747 

14379 057306 063501 

14380 057310 060144 

14381 057312 060557 
14382 

14383 057314 061005 

14384 057316 063561 

14385 057320 060162 

14386 057322 060674 
14387 

14388 057324 061037 

14389 057326 063561 

14390 057330 060172 
14191 057332 060674 
14392 

14393 057334 061105 

14394 057336 063615 

14395 057340 060202 

14396 057342 060557 
14397 

14398 057344 061162 

14399 057346 063615 

14400 057350 060202 

14401 057352 060557 
14402 

14403 057354 061207 

14404 057356 063615 

14405 057360 060202 

14406 057362 060557 
14407 

14408 057364 063173 

14409 057366 064714 

14410 057370 060476 

14411 057372 060557 



B16 
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SEQ 0403 



•SBTTL TABLE ERROR POINTER 

•THIS TABLE CONTAINS THE INFORMATION FOR EACH ERROR THAT CAN OCCUR 
•THE INFORMATION IS OBTAINED BY USING THE INDEX NUMBER FQCWO IN 
♦LOCATION *ITEMB. THIS NUMBER INDICATES UHICH ITEM IN THE TABLE IS PERTINENT 



•NOTEl: 
•N0TE2: 



EM 
OH 
DT 
OF 



lERRTB: ; ERROR 
EM24 



IF $ITEMB IS 0 THE ONLY PERTINENT DATA IS (ERRPC). 
EACH ITEM IN THE TABLE CONTAINS 4 POINTERS EXPLAINED AS FOLLOUS: 

POINTS TO THE ERROR MESSAGE 
POINTS TO THE DATA HEADER 
POINTS TO THE DATA 
POINTS TO THE DATA FORMAT 



DH13 
DT13 
OFll 

: ERROR 2 

EM2 

OHl 

DTI 

DF2 

: ERROR 3 

EM3 

DH3 

DT3 

OF 9 

: ERROR 4 

EM4 

DH3 

DT4 

DF9 

: ERROR 5 

EMS 

DH5 

DT5 

DF2 

: ERROR 6 

EM6 

0H5 

DT5 

DF2 

; ERROR 7 

EM7 

DH5 

DT5 

DF2 

: ERROR 10 

EM53 

0H25 

DT25 

0F2 



cvnjAAo risvii-j nenoiir diag. 

TABLE ERROR POINTER 



MACRO VOS.Olb Friday 15-Feb-8S 



14414 




; ERROR 


14415 057374 


061247 


EMU 


14416 057376 


063741 


0H7 


14417 057400 


060234 


DT7 


14418 057402 


060603 


DF3 


14419 




; ERROR 


14420 057404 


061247 


EMU 


14421 057406 


063741 


DH7 


14422 057410 


060234 


DT7 


14423 057412 


060616 


0F4 


14424 




: ERROR 


14425 057414 


061271 


EM12 


14426 057416 


064051 


OHIO 


14427 057420 


060264 


DTIO 


14428 057422 


060557 


DF2 


14429 




: ERROR 


14430 057424 


061247 


EMU 


14431 057426 


063741 


DH7 


14432 057430 


060234 


DT7 


14433 057432 


060631 


OF 5 


14434 




: ERROR 


14435 057434 


061247 


EMU 


14436 057436 


063741 


DH7 


14437 057440 


060234 


DT7 


14438 057442 


060644 


DF6 


14439 




: ERROR 


14440 057444 


061315 


EM13 


14441 057446 


064172 


DH13 


14442 057450 


060320 


DT13 


14443 057452 


060701 


DFll 


14444 




: ERROR 


14445 057454 


061347 


EM14 


14446 057456 


064172 


DH13 


14447 057460 


060320 


DT13 


14448 057462 


060701 


DFll 


14449 




i ERROR 


14450 057464 


061413 


EM15 


14451 057466 


064172 


DH13 


14452 057470 


060320 


DT13 


14453 057472 


060701 


DFll 


14454 




: ERROR 


14455 057474 


063222 


EM55 


14456 057476 


064752 


DH26 


14457 057500 


060510 


DT26 


14458 057502 


060557 


DF2 


14459 




: ERROR 


14460 057504 


061461 


EM17 


14461 057506 


063741 


DH7 


14462 057510 


060234 


0T7 


14463 057512 


060631 


0F5 


14464 




: ERROR 


! 14465 057514 


063042 


EM50 


14466 0S7S16 


064566 


DH23 


14467 057520 


060434 


DT23 


14468 057522 


060712 


DF13 



C16 

16:10 Page 458 



SEQ 0404 



D16 



CVMJAAO MSVll-J MEMORY DIAG. 
TABLE ERROR POINTER 



14471 

14472 

14473 

14474 

14475 

14476 

14477 

14478 

14479 

14480 

14481 

14482 

14483 

14484 

14485 

14486 

14487 

14488 

14489 

14490 

14491 

14492 

14493 

14494 

14495 

14496 

14497 

14498 

14499 

14500 

14501 

14502 

14503 

14504 

14505 

14506 

14507 

14508 

14509 

14510 

14511 

14512 

14513 

14514 

14515 



057524 

057526 
057530 
057532 

057534 
057536 
057540 
057542 

057544 
057546 
057550 
057552 

057554 
057556 
057560 
057562 

057564 
057566 
057570 
057572 

057574 
057576 
057600 
057602 

057604 
057606 
057610 
057612 

057614 
057616 
057620 
057622 

057624 
057626 
057630 
057632 



061521 
064172 
060320 
060701 

061573 
064172 
060320 
060701 

000000 
064165 
060314 
060557 

061652 
064147 
060306 
060557 

061706 
064172 
060320 
060701 

000000 
064267 
060342 
060557 

061733 
063615 
060202 
060557 

062041 
064346 
060360 
060657 

062066 
064465 
060410 
060603 



MACRO V05.01b Friday IS Feb 85 16:10 Page 460 



{ERROR 24 

EM19 

0H13 

DT13 

DFll 

: ERROR 25 

EM20 

DH13 

DT13 

DFll 

: ERROR 26 

0 :N0 MESSAGE 

DH12 

DT12 

OF 2 

s ERROR 27 

EM21 

DHll 

DTll 

DF2 

i ERROR 30 

EM22 

DH13 

DT13 

DFll 

; ERROR 31 

0 ;H0 MESSAGE 

DH14 

DT14 

DF2 

: ERROR 32 

EM23 

DH5 

DT5 

DF2 

i ERROR 33 

EM25 

DH15 

0T16 

DF7 

: ERROR 34 

EM26 

DH16 

0T17 

OF 3 



CVMJAAO MSVll-J MEMORY OJAG. 
TABLE ERROR POINTER 



E16 
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SEQ 0406 



14518 

14519 

14520 

14521 

14522 

14521 

14524 

14525 

14526 

1452/ 

14528 

14529 

14530 

14531 

14532 

14533 

14534 

14535 

14536 

14537 

14538 

14539 

14540 

14541 

14542 

14543 

14544 

14545 

14546 

14547 

14548 

14549 

14550 

14551 

14552 

14553 

14554 

14555 

14556 

14557 

14558 

14559 

14560 

14561 

14562 

14563 

14564 

14565 

14566 

14567 



057634 
057636 
057640 
057642 

057644 
057646 
057650 
057652 

057654 
057656 
057660 
057662 

057664 
057666 
057670 
057672 

057674 
057676 
057700 
057702 

057704 
057706 
057710 
057712 

057714 
057716 
057720 
057722 

057724 
057726 
057730 
057732 

057734 
057736 
057740 
057742 

057744 
057746 
057750 
057752 



063146 
064714 
060476 
060557 

062137 
064465 
06041U 
060672 

062634 
063741 
060234 
060603 

062227 
063741 
060234 
060603 

062311 
063741 
060234 
060631 

063343 
064507 
060434 
060712 

062421 
063741 
060234 
060603 

062526 
063741 
060234 
060603 

063076 
064645 
0604S6 
060722 

062721 
063674 
060220 
060557 



: ERROR 35 

EM52 

DH25 

DT25 

0F2 

: ERROR 36 

EM27 

DH16 

DT17 

DF8 

: ERROR 37 

EM35 

DH7 

DT7 

OF 3 

: ERROR 40 

EM29 

DH7 

DT7 

DF3 

: ERROR 41 
EM30 

DH7 
DT7 
DF5 

: ERROR 42 

EM60 

DH20 

DT23 

DF13 

: ERROR 43 

EM32 

DH7 

DT7 

OF 3 

.ERROR 44 

EM33 

DH7 

DT7 

DF3 

; ERROR 45 

EM51 

DH24 

DT24 

OF 14 

.-ERROR 46 

EM36 

DH6 

DT6 

DF2 



cvnjAAo nsvii-j memory oiag. 

TABLE ERROR POINTER 



F16 
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SEQ 040 



14570 






: ERROR 


14571 


057754 


062770 


EM40 


14572 


057756 


063536 


DH2 


14573 057760 


060416 


DT20 


14574 


057762 


060557 


DF2 


14575 






; ERROR 


14576 


057764 


063243 


EM56 


14577 


057766 


064770 


DH27 


14578 


057770 


060516 


DT27 


14579 


057772 


060556 


DFl 


14580 






; ERROR 


14581 


057774 


063405 


EM61 


14582 


057776 


064645 


DH24 


14583 


060000 


060456 


DT24 


14584 


060002 


060722 


DF14 


14585 






J ERROR 


14586 


060004 


062227 


En29 


14587 


060006 


064172 


DH13 


14588 


060010 


060320 


DT13 


14589 


060012 


060701 


DFll 


14590 






pnn An 

; ERROR 


14591 


060014 


062041 


En2b 


14592 


060016 


065044 


Dn30 


14593 


060020 


060536 


DT30 


14594 


060022 


060740 


Dr Id 


14595 






: ERROR 


14596 


060024 


063275 


ttn 1 


14597 


060026 


065044 


fMJTA 
0H30 


14598 


060030 


060536 


DT30 


14599 060032 


060740 


DH6 


14600 






COD AO 


14601 


060034 


061573 


CMOA 


14602 


060036 


064645 




14603 


060040 


Af Ad C£ 

0604S6 


\J 1 c4 


14604 


060042 


Af A^ f> 

060722 




14605 






. cDOno 
; tKKUK 


14606 


060044 


061573 


CM9A 


14607 


060046 


065044 


ALITA 


14608 


060050 


060536 


ATTA 


14609 


060052 


Af A^d A 

060740 


AC 1 C 

Dr lo 


14610 






CDDAD 

; tKKUK 


14611 


060054 


061521 


CM 1 Q 


14612 


060056 


064645 




14613 


060060 


A^ A^ r ^ 

060456 


AT '^A 

D 1 24 


14614 


060062 


Af A^V A'\ 

060722 


AC 1 A 


14615 






CDDAD 

; tKKUK 


14616 


060064 


061315 


CM 1 T 

Eni3 


14617 


060066 


064507 


Dn20 


14618 


060070 


060434 


AT 

DT23 


14619 


060072 


060712 


AC 1 T 

Dr 13 


. 14620 






CDO AD 

;tKROK 


1 14621 


060074 


062311 


tnau 


14622 


060076 


064507 


DH20 


14623 


060100 


060434 


DT23 


14624 


060102 


060712 


DF13 


14625 






: ERROR 


14626 


060104 


061573 


EM20 



CVMJAAO MSVll-J rCnORY OIAG. MACRO VOS.Olb Friday 15-Feb 85 
TABLE ERROR POIMTER 



146^7 060106 


064645 


DH24 


14628 060110 


060456 


DT24 


14629 060112 


060722 


DF14 


14630 




: ERROR 


14631 060114 


061706 


EM22 


14632 060116 


064645 


DH24 


14633 060120 


060456 


DT24 


14634 060122 


060722 


DF14 


14635 




; ERROR 


14636 060124 


063426 


EM62 


14637 060126 


063615 


DH5 


14638 060130 


060202 


DT5 


14639 OqPIS^ 


060557 


Or 2 


14640 




: ERROR 


14641 060134 


061706 4« 


EM22 


14642 060136 


064507 


0H20 


14643 060140 


060434 


DT23 


14644 060142 


060712 


DF13 



G16 

:10 Page 464-1 



SEQ 0408 



CVrijAAO MSVll-J MEMORY 
ERROR DATA TAGS (DT) 



14646 




14647 


060144 


002020 




060152 


002052 


14648 


060156 


002020 


14649 


060162 


002020 




060170 


000000 


14650 


060172 


002020 




060200 


000000 


14651 


060202 


002020 




060210 


177576 




060216 


000000 


14652 


060220 


002020 




060226 


002424 


14653 


060234 


002020 




060242 


002176 




060250 


002060 


14654 


060252 


002176 




060260 


002176 


14655 


060264 


002200 




060272 


002206 




060300 


002214 


14656 


060306 


002020 


14657 


060314 


002150 


14658 


060320 


002020 




060326 


002176 




060334 


002314 


14659 


060342 


177746 




060350 


177576 




060356 


000000 


14660 


060360 


002020 




060366 


002044 


14661 


060374 


002052 




060402 


002176 


14662 


060410 


002020 


14663 


060416 


002020 




060424 


000000 


14664 


060426 


002020 


14665 


060434 


002020 




060442 


002052 




060450 


002176 


14666 


060456 


002020 




060464 


002176 




060472 


002176 


14667 


060476 


002020 




060504 


002152 


14668 


060510 


002020 


14669 


060516 


002C20 




060524 


002176 




060532 


002176 


14670 


060536 


002020 




060544 


002044 




060552 


002176 



DIAG. MACRO VOS.Olb 



002034 


002044 


DTI: 


000000 






AAAAAA 






002036 


002072 


DT3: 


002034 


002070 


DT4: 


i.1 13 Id 


1 7757A 
if to (•* 


U 1 3 : 


172516 


177766 




002*22 


002400 


DT6: 


002402 


000000 




002176 


002034 


DT7: 


002044 


002052 




002176 


002176 




000000 






002202 


002204 


DTIO: 


002210 


002212 




002216 


000000 






\Jv\J\J\J\J 




000000 




DT12: 


002176 


002034 


DT13: 


002246 


002250 




002150 


000000 




177572 


177574 


DT14: 


172516 


177766 




002176 


002176 


DT16: 


002046 


002050 




002054 


002056 




002176 


000000 




002176 


000000 


DT17: 


C02044 


002052 


DT20: 


002176 


000000 


DT22: 


OOil 76 


002044 


DT23: 


002176 


002176 




002176 


000000 




002176 


002150 


DT24: 


002176 


002176 




000000 






002044 


002150 


DT25: 


000000 






002052 


000000 


DT26: 


002176 


002034 


DT27: 


002176 


002176 




000000 






002176 


002176 


DT30: 


002052 


002150 




000000 
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SEQ 0409 

.SBTTL ERROR DATA TAGS (DT) 

.WORD ERRPC. ADDRESS, GOOD. BAD. 0 

.WORD ERRPC. 0 

.UORD ERRPC. PADDRESS.PARCNT.O 

.WORD ERRPC. ADDRESS. NEMCNT.O 

, UORD ERRPC . MMRO . MMRl . MMR2 . MMR3 . CPUERR . 0 

. UORD ERRPC . APTPAR . LSIZE . APTECC . MSIZE . 0 

. UORD ERRPC . DUMMY , ADDRESS , DUMMY , GOOD . BAD . B ADXOR 

.UORD DUMMY, DUMMY, DUMMY, DUMMY, 0 

. UORD DETRO , DETRl , DETR2 , DETR3 , DETR4 , DETR5 . DETSP , DETPSU . 0 

.UORD ERRPC, CSR,0 

.UORD CSR,0 

. UORD ERRPC , DUMMY , ADDRESS , DUMMY , TSTDAT , TSTDAT*2 , CHECK , CSR , 0 

. UORD CONTRL . MMROTHRRl , MMR2 . MMR3 , CPUERR , 0 

. UORD ERRPC , DUMMY , DUMMY , GOOD , G00D2 , G00D3 

. UORD BAD , BAD2 , DAD3 , DUMMY , DUMMY , 0 

.UORD ERRPC. DUMMY, 0 

.UORD ERRPC. GOOD, BAD, 0 

.UORD ERRPC, DUMMY, 0 

. UORD ERRPC , DUMMY , GOOD , P AD , DUMMY , DUMMY , DUMMY , DUMMY , 0 

. WORD ERRPC , DUMMY . CSR , DUMMY . DUMMY . DUMMY , DUMMY , 0 

.UORD ERRPC, GOOD, CSR, CSRNO.O 

.UORD ERRPC. BAD, 0 

. UORD ERRPC . DUMMY , ADDRESS , DUMMY , DUMMY , DUMMY , DUMMY , 0 



.WORD 



ERRPC , DUMMY , DUMMY . GOOD . B AD . CSR . DUMMY , 0 
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ERROR DATA FORMATS (OF) SEQ 0410 



14673 










. SBTTL 


ERROR DATA FORMATS CDFj 


14674 060556 


AAA 

000 






AP « 

Or 1 : 


.BYTE 


0 


14675 060557 


AAA 

000 


AAA 
000 


AAA 

000 


Dr2: 


.BYTE 


AAAAAAAAAAAAAAAAAAAA 

0,0.0,0,0,0,0,0,0,0,0.0,0,0.0.0.0.0,0,0 


060562 


AAA 

000 


AAA 

000 


AAA 

000 






060565 


AAA 

000 


AAA 

000 


AAA 

000 








060570 


AAA 

000 


AAA 

000 


AAA 

000 








A^AC^V 

060579 


AAA 
000 


AAA 
000 


AAA 

000 








060576 


AAA 
000 


AAA 

000 


AAA 

000 








060601 


AAA 
000 


AAA 
000 










\A£.^C A^A^AV 

14676 060609 


AAA 
000 


AAC 

005 


AAA 

000 


ACT 

Dr 5: 


.BYTE 


0,5,0.6. ,0,0,0,5,0.2.4 


A£ A^ A£. 

060606 


A 1 A 
010 


AAA 
000 


AAA 

000 






U6U011 


f\f\f\ 

uuu 


rtrtT 
005 


AAt 

00b 








U6U614 


Arts 


rtrtA 
004 










140 ' ' oouoie 


rtrtrt 


rtrtC 
005 


AAA 

000 


Ur 4 : 


DVTC 

.BYTt 


ACAQ AQ Q It^A 
0.5,0.0. .0,0. .0. .5.b,2,4 


UDUOcl 


rti rt 


rtrtrt 
000 


rt 1 rt 
010 








rti rt 


rtrtT 
005 


rtrtt 

ooo 








OoUbe ' 


AAO 


AAA 

004 










H ACTA A^A^TI 


AAA 


AAC 

005 


AAA 

UOU 


Or 5: 


DVTC 

.dT lb 


ACAQ Q Q Q 7tOA 


ObObo** 


A1 A 

UIU 


rti 1 
Oil 


All 

oil 






A^A£77 

ObUbo ' 


All 

Oil 


AAT 
005 


AAt 

00b 








A^Ai^A 0 

ObUO'te 


rtrta 


rtrtA 

004 










14b fy ObOb** 


AAA 


rtrtC 

005 


rtrtrt 

uou 


net . 
UrO : 


DVTC 
. D T 1 1 


ACrtQ Q Q Q 7tOyl 

0.3.0,0. ,7. ,0. .0. .5.b,£,4 


uouo*> f 


rt 1 rt 


rti 1 
Oil 


rt 1 rt 
UIU 








A^A^C^ 

UbUbse 


rt 1 rt 


rtrtT 

005 


rtrtt 

ooo 








AiLA^CC 

UbUo J J 


rtrta 


rtrtA 
U04 










1 ACAf\ ncf\c^l 


rtrtrt 
Uwv 


rtrtC 
OOj 


rti rt 
OIU 


nF7 . 

Or 1 : 


OVTC 


rtCn rtrtQ rtrtO OA 

0,3,0. ,o,o,y. ,o,o,y. .«:,4 


UbUbbc 


rtrtrt 


rtrtrt 

UOO 


rti 1 
Ull 








UbUbbs 


rtrtrt 
uuu 


rtrtrt 

ooo 


rti 1 
oil 








At A/L7A 


rtrt3 


rtrtA 










14O01 UOUO'c 


rtrtrt 


rtrt<\ 




nPA • 

Ur O I 


RYTP 


rt 5 

0 , 3 


liltAO AtAt7A 


rtrtrt 
000 


rtrti 

OOi 


rtrti 
OOI 


Or "y : 


nvTP 


rt 1 1 1 1 
U , I . I , I , I 


A/LA/L77 




rtrti 










14oo^ UbU'Ui 


rtrtrt 


rtrt^ 


rtrtrt 
vOU 


nPi 1 • 


BYTP 


rt^rtR rtrtrtrtrt 
U.3.U.O. (U.U.U.U.U 


UbO f 0* 


rti rt 


rtrtrt 
uou 


rtrtrt 








A4rt7ft7 
UbU r U r 


rtrtrt 


rtrtrt 
ooo 


rtrtrt 
OUO 








liltAA A£A7 1 3 


rtrtrt 
OUO 


rtrtC 
009 


rtrtrt 
ooo 




BYTP 


rt<;rtrt'^A3d 

0.3.0,0.5.0. £.4 


A&A7 1 C 

Obo fio 


rtrtrt 
000 


rtrtT 
005 


rtrt<> 

ooo 








AtA7 3A 

UbU f c\J 


rtrta 
OOe 


nnA 

004 










14005 yJOVicc 


rtrtrt 
000 


rtrtC 
OO J 


rtrtrt 
ooo 


nPi d • 

Ur m : 


RYTP 


rt 5 rt 7 A 3 A 


At A7 OC 

ObO r£5 


rtrtT 

005 


rtrtt 
00b 


rtrtO 

OOe 










OO* 














000 


005 


000 


DF15' 


BYTE 


0 5 0 8 3 6 4 


060734 


010 


003 


006 








060737 


004 












14687 060740 


000 


005 


010 


DF16: 


.BYTE 


0.5,8. ,0,0.3.4 


060743 


000 


000 


003 








060746 


004 
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ERROR MESSAGES (Efl) 
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SEQ 0411 



14696 060747 


103 


101 


116 


060752 


047 


124 


040 


060755 


123 


105 


124 


0t>0760 


040 


062 


062 


060763 


040 


102 


111 


060766 


124 


040 


115 


060771 


117 


104 


105 


060774 


040 


111 


116 


060777 


040 


115 


115 


061002 


122 


063 


000 


14697 061005 


120 


101 


122 


061010 


111 


124 


131 


061013 


040 


105 


122 


061016 


122 


117 


122 


061021 


050 


123 


051 


061024 


040 


111 


116 


061027 


040 


102 


101 


061032 


116 


113 


040 


061035 


060 


000 




1469S 061037 


116 


117 


116 


061042 


055 


105 


130 


061045 


111 


123 


124 


061050 


101 


116 


124 


061053 


040 


115 


105 


061056 


115 


117 


122 


061061 


131 


040 


050 


061064 


110 


117 


114 


061067 


105 


123 


051 


061072 


040 


111 


116 


061075 


040 


102 


101 


061100 


116 


113 


040 


061103 


060 


000 


114 


14699 061105 


111 


114 


061110 


105 


107 


101 


061113 


114 


040 


117 


061116 


122 


040 


122 


061121 


105 


123 


105 


061124 


122 


126 


105 


061127 


104 


040 


111 


061132 


116 


123 


124 


061135 


122 


125 


103 


061140 


124 


111 


117 


061143 


116 


040 


050 


061146 


124 


122 


101 


061151 


120 


040 


124 


061154 


117 


040 


061 


061157 


060 


051 


000 


14700 061162 


125 


116 


105 


061165 


130 


120 


105 


061170 


103 


124 


105 


061173 


104 


040 


124 


061176 


122 


101 


120 


061201 


040 


124 


117 


061204 


040 


064 


000 


14701 061207 


115 


105 


115 


061212 


117 


122 


131 



.SBTTL ERROR MESSAGES (EM) 

.ASCIZ /CAN'T SET 22 BIT MODE IN MMR3/ 



.ASCIZ /PARITY ERROR(S) IN BANK 0/ 



.ASCIZ /NON-EXISTANT MEMORY (HOLES) IN BANK 0/ 



.ASCIZ /ILLEGAL OR RESERVED INSTRUCTION (TRAP TO 10)/ 



, ASCIZ /UNEXPECTED TRAP TO 4/ 



.ASCIZ /MEMORY MANAGEMENT (TRAP TO 250)/ 



CVMJAAO MSVll-J MEMORY DIA6 
ERROR MESSAGES (EM; 



MACRO VOS.Olb Friday lS-Feb-85 16 



K16 

:10 Page 469-1 



SEQ 0412 





A^A 


lis 

113 


1 A1 
lUl 


f\£. 1 O O A 

Qbieev 


lib 


1 A1 
lUl 


1 A7 
lU ' 




1 A4 
XV3 


114 
113 


1 A4 


AA 1 O^i^ 


1 1 A 
1 10 


1 OA 
Ic* 


AAA 


AA 1 3T 1 


V3v 


1 94 
It* 


1 99 
iCC 




1 m 
xvx 


1 90 

lev 


040 
V*V 




1 9A 


117 
11 ' 


A40 
V^V 


voices 


M19 


M4 


WDV 




V3X 


AOO 






1 IS 
1X3 


104 

1V3 


114 
113 




1 17 
XX ' 


199 
xcc 


111 
XdX 


944 


CiAti 


1 04 


101 
IVl 




Xc'' 


101 
xvx 


040 
V^V 


<Vt1 9AX 




1 99 
ICC 


199 
xcc 


AAI 9/>6 


117 
XX ' 


1 99 
xcc 


000 
vw 


1A7ni A41971 


104 
XV*t 


1 04 
XV9 


194 


AA1974 
vvlc 


101 
xvx 


111 
XXX 


114 
XX** 


OAl 977 


1 04 

XV J 


1 04 
xv** 


04 0 

V**V 


1 Yn9 


1 04 
XV J 


1 99 
ICC 


1 99 
XCC 




1 1 7 

XX 1 


1 99 
ICC 


040 

V"*V 




10A 


194 

XCJ 


1 14 
X x^ 


M M 


190 

XC V 


000 
vvv 






1 1 4 
xx^ 


1 1 1 

XXX 


123 

XC <^ 




191 


111 

XXX 


116 

X xu 


^91 


107 

X V r 


040 


105 

XV J 


0<« 1 T9A 
vox vCO 


110 
X JV 


IPO 

XC V 


105 

X Vi^ 


A<,1 111 
vox J JX 


101 

XV J 


xc^ 


105 

X V w 


UOX J 


104 

X V"» 


040 


123 

XC w 


vOX 0 J r 


109 
X vc 


105 

XV J 


040 


VOX OHc 


106 


1 14 
xx^ 


101 

xvx 


vox 


107 

X V f 


000 
vw 




X*i f v3 VOX J"*' 


197 

XC ( 


122 

X c c 


111 

A X X 


vox i^^C 


194 


105 

X 


040 

V~ V 


V V X ^ J J 


lOP 


131 

X 


124 


wDX <9vw 


104 

X ViJ 


040 


106 

X w 


vox JO w 


101 
xvx 


111 

XXX 


114 

A X~ 


vox 000 


104 
X v^ 


104 

X v~ 


040 

V^V 


VOXO ' X 


124 


117 

XX ' 


040 


A&1 V7A 

vOXO r*» 




114 


105 

X VJ 


rtftl '177 
VOX J r r 


101 
xvx 


xcc 


040 

V^V 


nAi An9 

VOX*»V6 


IPS 

XCw 


lOP 
xvc 


105 

X VW 


A£ 1 AM 
vOX**V J 


040 
vtv 


106 

X Vv 


114 

X x~ 


VOX" XV 


101 
xvx 


107 

XV * 


000 

vvv 


X**rVD VoX"*XJ 


106 

X Vw 


101 
xvx 


111 

XXX 


A& 1 A 1 c. 
VwX**Xw 


1 14 
X x*» 


105 

X V w 


104 

X v^ 


VOX"*CX 


040 


1P4 
xc~ 


117 

X X • 


rtAI A9A 




107 

XV r 


10s 
X vw 




xc~ 


040 

V~ V 


1 11 

XXX 


VD X ^ 


X X w 


194 


105 

X VW 


06143S 

Vw X ^ ^ J 


XC > 


122 

X cc 


125 

w 


061440 


12C 


124 


040 


061442 


12" 


111 


124 


061446 


1!0 


040 


104 


061451 


102 


105 


040 


0614S4 


106 


114 


101 


061457 


107 


000 




14707 061461 


115 


105 


115 



.ASCIZ /MEMORY DATA ERROR/ 



.ASCIZ /DETAILED ERROR DUMP/ 



, ASCIZ /MISSING EXPECTED SBE FLAG/ 



, ASCIZ /WRITE BYTE FAILED TO CLEAR SBE FLAG/ 



•ASCIZ /FAILED TO GET INTERRUPT WITH DBE FLAG/ 



, ASCIZ /MEMORY DATA ERROR IN CHECK BITS/ 



CVHJAAO MSVll-J MEHORY 01 AG. 



ERROA MESSAGES 


(Eri) 








061464 


117 


122 


131 




061467 


040 


104 


101 




061472 


124 


101 


040 




061475 


105 


122 


122 




061500 


117 


122 


040 




061503 


111 


116 


040 




061506 


103 


110 


105 




061511 


103 


113 


040 




061514 


102 


111 


124 




061517 


123 


000 






14700 061521 


123 


102 


105 


Eni9: 


061524 


055 


104 


102 




061527 


105 


040 


103 




061532 


101 


125 


123 




061535 


105 


104 


040 




061540 


120 


101 


122 




061543 


111 


124 


131 




061546 


040 


124 


122 




061551 


101 


120 


040 




061554 


127 


110 


105 




061557 


116 


040 


111 




061562 


116 


110 


111 




061565 


102 


111 


124 




061570 


105 


104 


000 




14709 061573 


123 


102 


105 


EM20: 


061576 


055 


104 


102 




061601 


105 


040 


104 




061604 


111 


104 


040 




061607 


116 


117 


124 




061612 


040 


103 


101 




061615 


125 


123 


105 




061620 


040 


120 


101 




061623 


122 


111 


124 




061626 


131 


040 


124 




061631 


122 


101 


120 




061634 


040 


127 


110 




061637 


105 


116 


040 




061642 


105 


116 


101 




061645 


102 


114 


105 




061650 


104 


000 




EM21: 


14710 061652 


123 


102 


105 


061655 


055 


104 


102 




061660 


105 


040 


117 




061663 


116 


040 


115 




061666 


101 


123 


124 




061671 


105 


122 


040 




061674 


124 


105 


123 




061677 


124 


040 


127 




061702 


117 


122 


104 




061705 


000 








14711 061706 


115 


111 


123 


Eri22: 


061711 


123 


111 


116 




061714 


107 


040 


105 




061717 


130 


120 


105 




061722 


103 


124 


105 




061725 


104 


040 


104 




061730 


102 


105 


000 





l16 
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SEQ 0413 



.ASCIZ /SBE-OBE CAUSED PARITY TRAP UHEN INHIBITED/ 



.ASCIZ /SBE-DBE DID NOT CAUSE PARITY TRAP UHEN ENABLED/ 



ASCIZ /SBE-DBE ON MASTER TEST UORD/ 



.ASCIZ /MISSING EXPECTED DBE/ 



M16 

CvnjAAO MSVll-J rcnORY OIAG. HACRO VOS.Olb Friday 15-Feb-85 16:10 Page *ti-l 



ERROR MESSAGES 


(EM) 








14712 061733 


125 


116 


105 


EM23: 


061736 


130 


120 


105 




061741 


103 


124 


105 




061744 


104 


040 


120 




061747 


101 


122 


111 




061752 


124 


131 


040 




061755 


124 


122 


101 




061760 


120 


000 






14713 061762 


122 


105 


103 


EM24: 


061765 


105 


111 


126 




061770 


105 


104 


040 




061773 


104 


102 


105 




061776 


040 


106 


114 




062001 


101 


107 


040 




062004 


127 


110 


105 




062007 


116 


040 


105 




062012 


130 


120 


105 




062015 


103 


124 


111 




062020 


116 


107 


040 




062023 


117 


116 


114 




062026 


131 


O'JO 


123 




062031 


102 


105 


040 




062034 


106 


114 


a Aa 

101 




062037 


107 


AAA 

000 






14714 062041 


103 


a 4 A 

110 


a AC 

105 


ct125: 


062044 


103 


a a V 

113 


AAA 

040 




062047 


102 


111 


124 




062052 


040 


104 


a A a 

101 




062055 


124 


101 


AAA 

040 




062060 


105 


122 


a ^ ^ 

122 




062063 


117 


122 


AAA 

000 




14715 062066 


101 


104 


1 Ail 

104 




062071 


122 


\ AC 

105 


123 




062074 


123 


AAA 

040 


120 




062077 


a Aa 

101 


a f% 

122 


111 




062102 


124 


a 9 a 

131 


AA A 

040 




062105 


105 


a 

122 


122 




062110 


a a ^ 

117 


a o ^ 

122 


AAA 

040 




062113 


104 


a a a 

111 


a AA 

104 




062116 


040 


a • A 

116 


117 




062121 


124 


040 


103 




062124 


101 


125 


a 

123 




062127 


105 


040 


a A a 

101 




062132 


102 


• a ^ 

117 


a t ^ 

122 




062135 


124 


AAA 

000 






14716 062137 


105 


a AV 

103 


a A9 

103 




062142 


AAA 

040 


• at 

111 


« a £ 

116 




062145 


110 


111 


t A 

102 




062150 


111 


124 


040 




062153 


115 


117 


104 




062156 


105 


040 


120 




062161 


117 


111 


116 




062164 


124 


105 


122 








106 


1 A1 
101 




062172 


111 


114 


125 




062175 


122 


105 


040 




062200 


055 


040 


104 





SEQ 0414 



.ASCIZ /UNEXPECTED PARITY TRAP/ 



.ASCIZ /RECEIVED DBE FLAG UHEN EXPECTING ONLY SBE FLAG/ 



•ASCIZ /CHECK BIT DATA ERROR/ 



.ASCIZ /ADDRESS PARITY ERROR DID NOT CAUSE ABORT/ 



.ASCIZ /ECC INHIBIT MODE POINTER FAILURE - DID NOT PROTECT BANK/ 



CVMJAAO MSVll-J MEMORY OIAG. 
ERROR MESSAGES (EM) 



Bl 
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SEQ 



062203 


111 


104 


040 




062206 


116 


117 


124 




062211 


040 


120 


122 




062214 


117 


124 


105 




062217 


103 


124 


040 




062222 


102 


101 


116 




062225 


1.'3 


000 






062227 


lOi 


117 


122 


EM29: 


062232 


122 


105 


103 




062235 


124 


111 


117 




062240 


116 


040 


106 




062243 


101 


111 


114 




062246 


125 


122 


105 




062251 


040 


127 


111 




062254 


124 


110 


040 




062257 


105 


103 


103 




062262 


040 


105 


116 




062265 


101 


102 


114 




062270 


105 


104 


040 




062273 


117 


116 


040 




062276 


106 


117 


122 




062301 


103 


105 


104 




062304 


040 


123 


102 




062307 


105 


000 






062311 


127 


122 


111 


EM30: 


062314 


124 


105 


040 




062317 


102 


131 


124 




062322 


105 


040 


127 




062325 


111 


124 


110 




062330 


040 


105 


103 




062333 


103 


040 


105 




062336 


116 


101 


102 




062341 


114 


105 


104 




062344 


040 


106 


101 




062347 


111 


114 


105 




062352 


104 


040 


124 




062355 


117 


040 


103 




062360 


114 


105 


101 




062363 


122 


040 


104 




062366 


101 


124 


101 




062371 


040 


101 


124 




062374 


200 








062375 


106 


117 


122 




062400 


103 


105 


104 




062403 


040 


123 


102 




062406 


105 


040 


114 




062411 


117 


103 


101 




062414 


124 


111 


117 




062417 


116 


000 






062421 


115 


117 


126 


EM32: 


06'>424 


102 


040 


043 




062427 


063 


066 


060 




062432 


054 


050 


122 




062435 


062 


051 


053 




062440 


040 


127 


111 




062443 


124 


110 


040 




062446 


105 


103 


103 





.Asciz /corre:tion failure uith ecc enabled on forced sbe/ 



.ASCII /URITE BYTE UITH ECC ENABLED FAILED TO CLEAR DATA AT/<CRLF> 



.ASCIZ /FORCED SBE LOCATION/ 



.ASCIZ /MOVB 0360, (R2)* UITH ECC ENABLED CHANGED DATA AT FORCED DBE LOCATION/ 



CVMJAAO MSVll-J MEMORY DIAG. 
ERROR MESSAGES (EM) 



CI 

MACRO VOS.Olb Friday lS-Feb-8S 16:10 Page 469 5 



SEQ 0416 



062451 


040 


105 


116 




062454 


101 


102 


xl4 




062457 


105 


104 


040 




062462 


103 


110 


101 




062465 


116 


107 


105 




062470 


104 


040 


104 




062473 


101 


124 


101 




062476 


040 


101 


124 




062501 


040 


106 


117 




062504 


122 


103 


105 




062507 


104 


040 


104 




062512 


102 


105 


040 




062515 


114 


117 


103 




062520 


101 


124 


111 




062523 


117 


116 


000 




14721 062526 


115 


117 


126 


EM33: 


062531 


040 


043 


061 




062534 


067 


067 


064 




062537 


060 


060 


054 




062542 


050 


122 


061 




062545 


051 


040 


4 1^ 

127 




062550 


111 


124 


4 4 A 

110 




062553 


040 


105 


4 AV 

103 




062556 


103 


040 


4 AC 

105 




062561 


116 


101 


4 A^ 

102 




062564 


114 


105 


4 f\A 

104 




062567 


040 


103 


4 1 A 

110 




062572 


101 


116 


4 A^ 

107 




062575 


105 


104 


Ail A 

040 




062600 


104 


101 


4 ^il 

124 




062603 


101 


Ail A 

040 


101 




062606 


124 


040 


106 




062611 


117 


122 






062614 


105 


104 


040 




062617 


104 


102 


105 




062622 


040 


4 4 il 

11'' 


117 




062625 


103 


4 A 4 

101 


4 ^il 

124 




062630 


111 


4 4^ 

117 


4 4 £ 

116 




062633 


000 






En35: 


14722 062634 


125 


116 


4 AC 

105 


062637 


130 


120 


4 AC 

105 




062642 


103 


4 

124 


1 AC 

105 




062645 


104 


AAA 

040 


4 AT 

103 




062650 


117 


122 


122 




062653 


105 


103 


124 




062656 


111 


• 4 ^ 

117 


4 4 C 

116 




062661 


040 


127 


111 




062664 


124 


110 


040 




062667 


105 


103 


4 A9 

103 




062672 


040 


1 Ail 

104 


111 

111 




062675 


123 


101 


102 




062700 


114 


105 


040 




062703 


117 


116 


040 




062706 


106 


117 


122 




062711 


103 


105 


104 




062714 


040 


123 


102 




062717 


105 


000 







.ASCIZ /MOV #177400. (Rl) WITH ECC ENABLED CHANGED DATA AT FORCED DBE LOCATION/ 



•ASCIZ /UNEXPECTED CORRECTION WITH ECC DISABLE ON FORCED SBE/ 



J MEMORY 01 AG. 



ERROR MESSAGES 


(EM) 








X~ WC 'CX 


101 


120 


124 


EM36: 


062724 


040 


123 


111 




062727 


132 


105 


040 




062732 


104 


111 


123 




062735 


101 


107 


122 




062740 


105 


105 


123 




062743 


040 


127 


111 




062746 


124 


110 


040 




062751 


120 


122 


117 




062754 


107 


122 


101 




062757 


115 


040 


123 




062762 


111 


132 


111 




062765 


116 


107 


000 




14724 062770 


102 


122 


101 


EM40: 


062773 


116 


103 


110 




062776 


040 


107 


117 




063001 


102 


102 


114 




063004 


105 


040 


106 




063007 


101 


111 


114 




063012 


105 


104 


040 




063015 


103 


117 


116 




063020 


104 


111 


124 




063023 


111 


117 


116 




063026 


040 


103 


117 




063031 


104 


105 


123 




063034 


040 


124 


105 




063037 


123 


124 


000 




14725 063042 


102 


101 


104 


EM50: 


063045 


040 


105 


122 




063050 


122 


117 


122 




063053 


040 


101 


104 




063056 


104 


122 


105 




063061 


123 


123 


040 




063064 


107 


105 


116 




063067 


105 


122 


101 




063072 


124 


105 


104 




063075 


000 








14726 063076 


106 


114 


101 


EM51: 


063101 


107 


123 


040 




063104 


116 


117 


124 




063107 


040 


123 


105 




063112 


124 


040 


117 




063115 


116 


040 


106 




063120 


117 


122 


103 




063123 


105 


104 


040 




063126 


125 


116 


103 




063131 


117 


122 


122 




063134 


105 


103 


124 




063137 


105 


104 


040 




063142 


123 


102 


105 




063145 


000 








14727 063146 


102 


111 


124 


EM52: 


063151 


040 


123 


105 




063154 


124 


040 


105 




063157 


122 


122 


117 




063162 


122 


040 


111 




063165 


116 


040 


103 





Dl 

MACRO V05.01b Friday 15-Feb-85 16:10 P»g« 469-6 



SEQ 0417 



.ASCIZ /APT SIZE DISAGREES WITH PROGRAM SIZING/ 



.ASCIZ /BRANCH GOBBLE FAILED CONDITION CODES TEST/ 



.ASCIZ /BAD ERROR ADDRESS GENERATED/ 



, ASCIZ /FLAGS NOT SET ON FORCED UNCORRECTED SBE/ 



, ASCIZ /BIT SET ERROR IN CSR/ 







01 AG. 


MACRO 


FRROR MESSAGES 


(EM) 






063170 


123 


122 


000 


14728 063173 


102 


111 


124 


063176 


040 


103 


114 


063201 


105 


101 


122 


063204 


040 


105 


122 


063207 


122 


117 


122 


063212 


040 


111 


116 


063215 


040 


103 


123 


063220 


122 


000 




14729 063222 


111 


114 


114 


063225 


105 


107 


101 


063230 


114 


040 


103 


063233 


123 


122 


040 


063236 


124 


131 


120 


063241 


105 


000 




14730 063243 


102 


101 


104 


063246 


040 


120 


101 


063251 


122 


111 


124 


063254 


131 


040 


124 


063257 


122 


101 


120 


063262 


040 


107 


105 


063265 


116 


105 


122 


063270 


101 


124 


105 


063273 


104 


000 




14731 063275 


127 


122 


117 


063300 


116 


107 


040 


063303 


103 


110 


105 


063306 


103 


113 


040 


063311 


102 


111 


124 


063314 


040 


122 


105 


063317 


101 


104 


040 


063322 


102 


101 


103 


063325 


113 


040 


106 


063330 


122 


117 


115 


063333 


040 


115 


105 


063336 


115 


117 


122 


063341 


131 


000 




14732 063343 


127 


122 


117 


063346 


116 


107 


040 


063351 


123 


131 


116 


063354 


104 


122 


117 


063357 


115 


105 


040 


063362 


102 


111 


124 


063365 


123 


040 


122 


063370 


105 


101 


104 


063373 


040 


111 


116 


063376 


124 


117 


040 


063401 


103 


123 


122 


063404 


000 






14733 063405 


103 


123 


122 


063410 


040 


125 


120 


063413 


104 


101 


124 


063416 


105 


040 


105 


063421 


122 


122 


117 


063424 


122 


000 




14734 063426 


120 


122 


117 


063431 


103 


105 


123 



El 

MACRO VOS.Olb Friday 15-Feb-8S 16:10 Page 469-7 



.ASCIZ /BIT CLEAR ERROR IN CSR/ 



SEQ 0418 



.ASCIZ /ILLEGAL CSR TYPE/ 



.ASCIZ /BAD PARITY TRAP GENERATED/ 



.ASCIZ /WRONG CHECK BIT READ BACK FROM MEMORY/ 



.ASCIZ /WRONG SYNDROME BITS READ INTO CSR/ 



.ASCIZ /CSR UPDATE ERROR/ 



.ASCIZ /PROCESSOR NOT SUPPORTED BY THIS DIAGNOSTIC/ 



Fl 

CVMJAAO MSVil-J MEMORY OIAG. MmCRO V05,01b Friday 15-Feb-85 16:10 Page 469 8 

ERROR MESSAGES (EM) " 3Eq ^4^9 



063434 


123 


117 


122 

Abb 


063437 


040 


116 


117 


063442 


124 


040 


123 

Ab «/ 


063445 


125 


120 


120 

Ab V 


063450 


117 


122 


124 


063453 


105 


104 


040 


063456 


102 


131 


040 


063461 


124 


110 


111 


063464 


123 


040 


j04 


063467 


111 


101 


107 


063472 


116 


117 


123 


063475 


124 


111 


103 


063500 


000 







CVMJAAO MSVll-J MEMORY DIAG. 
ERROR DATA HEADERS (OH) 

14737 



MACRO VOS.Olb Friday 15-Feb-85 16 



Gl 

;10 Page 471 



SEQ 0420 



I'* do Ooijyjl 


KjH\J 




1 30 
Xcv 


DMI . 
unx : 




1 












1 OA 
XvH 


1 




vome 


1 




101 
xux 








104 

XVH 


OAO 
v*ffv 










107 
XU f 






117 


117 

XX f 


104 






040 


040 


040 




V/O J3 


OAO 


10P 


101 
XvX 






104 


000 








040 


040 

V~ V 


IPO 

Xb V 


DH2> 


0ft^^4 1 


103 

XV J 


040 

V~ V 


040 

v~v 






040 


107 

XV f 


104 

X V^ 




0#>3^47 


055 


103 

X VW 


103 

X v«^ 




WV<J J 


040 


10P 
xvc 


104 

X v~ 






055 

V J J 


103 

X V«J 


103 

A v«# 






000 








14740 063^fal 


040 


040 


120 


0H3: 


063^64 


103 


040 


040 






040 


061 


123 

Ab «J 




063572 


124 


040 


101 




063575 


104 


104 

A V^ 


040 




VO <Jw w 


040 


043 


040 




063603 


117 


106 


040 




063606 


105 


122 


122 




063611 


117 


122 


123 




063614 


000 








14741 063615 


040 


040 


120 


OHS: 


063620 


103 


040 


040 




063623 


040 


040 


040 




063626 


115 


115 


122 




063631 


060 


040 


040 




063634 

VW v~ 


040 


040 


115 




063637 


115 

A A a' 


122 


061 




063642 


040 


040 


040 




063645 


040 


115 


115 




063650 

VW JV 


122 

Abb 


062 


040 




063653 


040 


040 


040 




063656 

Vv JV 


115 


115 


122 






063 


040 


040 




063664 


040 


103 


120 




063667 


125 

Ab 


105 

A V*^ 


122 




063672 


122 

Xb b 


000 

wv 






1474? 063674 


040 


040 


120 

Xb V 


0H6: 


063677 


103 


040 


040 




063702 


040 


101 

A vx 


120 

Xb V 




063705 


124 


120 


101 




063710 


122 


040 


040 




063713 


040 


114 


123 




063716 


111 


132 


105 




063721 


040 


040 


101 




063724 


120 


124 


105 




063727 


103 


103 


040 




063732 


040 


115 


123 




063735 


111 


132 


105 




063740 


000 









.SBTTL ERROR DATA HEADERS (DH) 
.ASCIZ / PC DEV ADO GOOD BAD/ 



.ASCIZ / PC GD CC BD-CC/ 



.ASCIZ / PC 1ST ADD 0 OF ERRORS/ 



.ASCIZ / PC MMRO MMRl MMR2 MMR3 CPUERR/ 



.ASCIZ / PC APTPAR LSIZE APTECC MSIZE/ 



CVMJAAO fISVll-J MEMORY DIAG. 
ERROR DATA HEADERS (DH) 



HI 

MACRO VOS.Olb Friday 15-Feb-85 16:10 Page 471-1 



SEQ 0421 



14743 063741 


040 


040 


120 


063744 


103 


040 


040 


063747 


040 


040 


102 


063752 


101 


116 


113 


063755 


040 


040 


126 


063760 


101 


104 


104 


063763 


040 


040 


040 


063766 


040 


040 


120 


063771 


101 


104 


104 


063774 


040 


040 


040 


063777 


040 


040 


107 


064002 


117 


117 


104 


14744 064005 


040 


040 


040 


064010 


040 


040 


102 


064013 


101 


104 


040 


064016 


040 


040 


040 


064021 


040 


130 


117 


064024 


122 


040 


040 


064027 


103 


123 


122 


064032 


040 


040 


115 


064035 


124 


131 


120 


064040 


040 


111 


116 


064043 


124 


040 


120 


064046 


101 


124 


000 


14745 064051 


040 


040 


122 


064054 


060 


040 


040 


064057 


040 


040 


040 


064062 


040 


122 


061 


064065 


040 


040 


040 


064070 


040 


040 


040 


064073 


122 


062 


040 


064076 


040 


040 


040 


064101 


040 


040 


122 


064104 


063 


040 


040 


064107 


040 


040 


040 


064112 


040 


122 


064 


064115 


040 


040 


040 


064120 


040 


040 


040 


064123 


122 


065 


040 


064126 


040 


040 


040 


054131 


040 


040 


123 


064134 


120 


040 


040 


064137 


040 


040 


040 


064142 


040 


120 


123 


064145 


127 


000 




14746 064147 


040 


040 


120 


064152 


103 


040 


040 


064155 


040 


040 


040 


064160 


040 


103 


123 


064163 


122 


000 




14747 064165 


040 


103 


123 


064170 


122 


000 




14748 064172 


040 


040 


120 


064175 


103 


040 


040 


064200 


040 


040 


102 


064203 


101 


116 


113 


064206 


040 


040 


126 



.ASCII / PC BANK VADD PADD GOOD/ 



.ASCIZ / BAD XOR CSR MTYP INT PAT/ 



.ASCIZ / RO Rl R2 R3 R4 R5 



SP 



PSU/ 



.ASCIZ / PC 



CSR/ 



.ASCIZ / CSR/ 

.ASCII / PC BANK VADD PADD UROTEl UR0TE2/ 



CVMJAAO MSVll-J MEMORr DIAG. 
ERROR DATA HEADERS (OH) 



II 

MACRO VOS.Oib Friday 15-Feb-85 16:10 Page 471-2 



SEQ 0422 



064211 


101 


104 


104 




064214 


040 


040 


040 




064217 


040 


040 


120 




064222 


101 


104 


104 




064225 


040 


040 


040 




064230 


040 


127 


122 




064233 


117 


124 


105 




064236 


061 


040 


040 




064241 


127 


122 


117 




064244 


124 


105 


062 




14749 064247 


C40 


103 


4 4 A 

110 




064252 


113 


102 


111 




064255 


124 


123 


040 




064260 


040 


040 


040 




064263 


103 


123 


4 AA 

122 




064266 


000 








14750 064267 


103 


117 


116 


Al_l4 il 

DH14: 


064272 


124 


122 


114 




064275 


040 


040 


A Jl /\ 

040 




064300 


115 


4 4 P 

lis 


122 




064303 


060 


040 


Ail A 

040 




064306 


040 


040 


lie 

115 




064311 


115 


4 

122 


A£ 4 

061 




064314 


040 


Ail A 

040 


Ail A 

OhO 




064317 


040 


4 4 C 

115 


lie 

115 




064322 


122 


062 


Ail A 




064325 


040 


040 


Ail A 

040 




064330 


115 


115 






064333 


063 


Ail A 

040 


Ail A 

040 




064336 


040 


4 AT 

103 


leO 




064341 


125 


f AC 

103 


lee 




064344 


122 


AAA 

000 




nui c . 
Uni3 : 


14751 064346 


040 


Ail A 

040 


1 3A 

leO 


064351 


103 


Ail A 

040 


AAA 

040 




064354 


040 


AAA 

040 


1 A3 
102 




064357 


101 


4 4 £ 

116 


117 

llo 




064362 


040 


040 


Ail A 

040 




064365 


040 


4 ^A 

120 


1 A 1 

101 




064370 


104 


1 Ail 

104 


Ail A 

04U 




064373 


040 


Ail A 

040 


1 m 
10 1 




064376 


104 


ACC 

055 


1 37 

12 r 




064401 


104 


061 


Ail A 

040 




064404 


040 


107 


1 Ail 

104 




064407 


055 


4 

127 


1 Ail 

104 




064412 


062 


Ail A 

040 


Ail A 

040 




064415 


107 


4 /\il 

104 


ACC 

055 




064420 


4 

103 


4 4 /\ 

110 


1 1 T 

113 




14752 064423 


040 


102 


4 A4 

101 




064426 


104 


ACC 

055 


1 3*7 

127 




064451 


104 








064434 


102 


101 


104 




064437 


055 


127 


104 




064442 


062 


040 


040 




064445 


102 


101 


104 




064450 


055 


103 


110 




064453 


113 


040 


111 




064456 


116 


124 


040 





.ASCIZ / CHKBITS CSR/ 



.ASCIZ /CONTRL MMRO MMRl MMR2 MMRS CPUERR/ 



.ASCII / PC BANK PAOD 60-UDl GD-U02 GO-CHK/ 



.ASCIZ / BAO-UDl BAD-U02 BAD-CHK INT PAT/ 



CVMJAAO MSVIJ-J MEMORY OIAG. 
ERROR DATA HEADERS (DH> 



Jl 
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SEQ 0423 





120 


101 


124 




000 








040 


040 


120 


064470 


103 


040 


040 


064473 


040 


040 


102 


064476 


101 


116 


113 


064501 


000 






14754 064502 


040 


040 


120 


064505 


103 


000 




14755 064SC7 


040 


040 


120 


064512 


103 


040 


040 


064515 


040 


040 


102 


064520 


101 


116 


113 


064523 


040 


107 


104 


064526 


055 


103 


123 


064531 


122 


040 


040 


064534 


050 


103 


123 


064537 


122 


051 


040 


064542 


040 


103 


123 


064545 


122 


040 


040 


064550 


115 


124 


131 


064553 


120 


040 


111 


064556 


116 


124 


040 


064561 


040 


120 


101 


064564 


124 


000 




14756 064566 


040 


040 


120 


064571 


103 


040 


040 


064574 


040 


040 


102 


064577 


101 


116 


113 


064602 


040 


107 


104 


064605 


055 


105 


122 


064610 


122 


040 


102 


064613 


101 


104 


055 


064616 


105 


122 


122 


064621 


040 


103 


123 


064624 


122 


040 


040 


064627 


115 


124 


131 


064632 


120 


040 


111 


064635 


116 


124 


040 


064640 


040 


120 


101 


064643 


124 


000 




14757 064645 


040 


040 


120 


064650 


103 


040 


040 


064653 


040 


040 


102 


064656 


101 


116 


113 


064661 


040 


040 


050 


064664 


103 


123 


122 


064667 


051 


040 


103 


064672 


123 


122 


040 


064675 


040 


115 


124 


064700 


131 


120 


040 


064703 


111 


116 


124 


064706 


040 


040 


120 


064711 


101 


124 


000 


14758 064714 


040 


040 


120 


064717 


103 


040 


040 


064722 


040 


040 


107 



.ASCIZ / PC BANK/ 



.ASCIZ / PC/ 

.ASCIZ / PC BANK GD-CSR (CSR) CSR MTYP INT PAT/ 



.ASCIZ / PC BANK GD-ERR BAD-ERR CSR MTYP INT PAT/ 



, ASCIZ / PC BANK (CSR) CSR MTYP INT PAT/ 



.ASCIZ / PC GO -OAT (CSR) CSRNO/ 



CVnjAAO MSVll-J MEMORY DIAG. 
ERROR DATA HEADERS (DH) 



Kl 
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SEQ 0424 





1 nA 








Uf>^ / Ov 


1 ni 


1 OA 






WO** I 00 






IvO 




WO't / oo 


1 ox 

IcO 








UD** ' ••1 




040 


u*»v 






1 OX 


1 a'? 


1 oo 




AAA*. Al 


116 


117 






040 


V*VV 


IPO 




06a7S9 


103 


040 
v*»v 


040 




Vv*v * wV 


lOP 


101 


104 






103 


117 


104 




06 A 766 


105 


000 

WV 








040 

w^w 


040 

W~W 


IPO 

ACV 


nHP7 • 

Line f • 




103 

XW^ 


v*»w 


040 




064776 


040 


040 
w*»w 


lOP 
xvc 






101 


1 16 


1 13 




06S004 


040 

V"f w 


040 

W^W 


1P6 

XCu 






101 

X wx 


104 


104 
X v^ 




VW J VAC 


040 

W"TW 


040 


040 

W"»W 






040 


040 


IPO 

XCv 




06S0P0 


101 


1 04 


104 




0650P3 


040 


040 


040 






103 


123 


122 

xcc 




065031 


040 

w 


040 

W^W 


115 

X X ^ 






124 


131 


120 

xc w 




065037 


040 


120 

XC V 


101 




06504? 


124 


000 






14761 065044 


040 


040 


120 

XC V 


DH30: 


065047 


103 


040 


040 




065052 


040 


040 


102 




065055 


101 


116 


113 




065060 


040 


040 


040 




065063 


120 


101 


104 




065066 

WW ^ V w w 


104 


040 


040 




065071 


040 


040 


127 




065074 


122 


117 


124 




065077 


105 


040 


040 




065102 


040 


040 


122 




065105 


105 


101 


104 




065110 


040 


040 


103 




065113 


123 


122 


040 




065116 


040 


120 


101 




065121 


124 


000 







.ASCIZ / PC BADCODE/ 



.ASCIZ / PC BANK VADD PADD CSR MTYP PAT/ 



-ASCIZ / PC BANK PAQD WROTE READ CSR PAT/ 



CVMJAAO MSVll 
nt'SSAGES 

14764 



LI 

•J MEMORY OIAG, MACRO VOS.Olb Friday 15 Feb-85 16:10 Page 473 



SEQ 0425 



14765 065123 


200 


040 


040 


065126 


040 


040 


040 


065131 


040 


040 


040 


065134 


040 


040 


040 


065137 


040 


040 


040 


065142 


040 


040 


040 


065145 


040 


040 


040 


065150 


040 


040 


040 


065153 


040 


115 


105 


065156 


115 


117 


122 


065161 


131 


040 


103 


065164 


117 


116 


106 


065167 


111 


107 


125 


065172 


122 


101 


124 


065175 


111 


117 


116 


065200 


040 


115 


101 


065203 


120 


000 




14766 065205 


200 


040 


040 


065210 


040 


040 


040 


065213 


040 


040 


040 


C65216 


040 


040 


040 


065221 


040 


040 


040 


065224 


040 


040 


040 


065227 


040 


040 


040 


065232 


040 


040 


040 


065235 


040 


040 


040 


065240 


040 


040 


040 


065243 


061 


066 


113 


065246 


040 


127 


117 


065251 


122 


104 


040 


065254 


102 


101 


116 


065257 


113 


123 


000 


14767 065262 


200 


040 


040 


065265 


040 


040 


040 


065270 


040 


040 


040 


065273 


040 


040 


040 


065276 


040 


040 


040 


065301 


040 


040 


061 


065304 


040 


040 


040 


065307 


040 


040 


040 


065312 


040 


062 


040 


065315 


040 


040 


040 


065320 


040 


040 


040 


065323 


063 






14768 065324 


040 


040 


040 


065327 


040 


040 


040 


065332 


040 


064 


040 


065335 


040 


040 


040 


065340 


040 


040 


040 


065343 


065 


040 


040 


065346 


040 


040 


040 


065351 


040 


040 


066 


065354 


040 


040 


040 


065357 


040 


040 


040 


065362 


040 


067 


040 


065365 


040 


000 





.SBTTL MESSAGES 
MSGOOl: .ASCIZ <CRLF>/ 



MEMORY CONFIGURATION MAP/ 



MSG002: .ASCIZ <CRLF>/ 



16K UORD BANKS/ 



MSG003: .ASCII <CRLF>/ 



3/ 



.ASCIZ / 



7 / 



cvnjAAo nsvn 

MESSAGES 



■J MEMORY 01 AG. 



Ml 

MACRO VOS.Olb Friday 15-Feb-85 16:10 Page 473-1 



SEQ 0426 



14769 065367 


200 


040 


040 


065372 


040 


040 


040 


065375 


040 


040 


040 


065400 


060 


061 


062 


065403 


063 


064 


065 


065406 


066 


067 


060 


065411 


061 


062 


063 


065414 


064 


065 


066 


065417 


067 


060 


061 


065422 


062 


063 


064 


065425 


065 


066 


067 


14770 065430 


060 


061 


062 


065433 


063 


064 


065 


065436 


066 


067 


060 


065441 


061 


062 


063 


065444 


064 


065 


066 


065447 


067 


060 


061 


065452 


062 


063 


064 


065455 


065 


066 


067 


065460 


060 


061 


062 


065463 


063 


064 


065 


065466 


066 


067 


060 


065471 


061 


062 


063 


065474 


000 






14771 065475 


200 


105 


122 


065500 


122 


117 


122 


065503 


123 


040 


040 


065506 


000 






14772 065507 


200 


125 


116 


065512 


104 


105 


106 


065515 


111 


116 


105 


065520 


104 


040 


124 


065523 


122 


101 


120 


065526 


040 


111 


116 


065531 


123 


124 


122 


065534 


125 


103 


124 


065537 


111 


117 


116 


065542 


032 


000 


105 


14773 065544 


200 


115 


065547 


115 


124 


131 


065552 


120 


105 


040 


065555 


000 




122 


14774 065556 


200 


120 


065561 


117 


124 


105 


065564 


103 


124 


040 


065567 


000 






14775 065570 


040 


040 


040 


065573 


040 


061 


040 


065576 


040 


040 


040 


065601 


040 


040 


040 


065604 


061 


040 


040 


065607 


040 


040 


040 


065612 


040 


040 


061 


065615 


040 


040 


040 


065620 


040 


040 


040 


065623 


040 


061 


040 


065626 


040 


040 


040 



MSG004: .ASCII <CRLF>/ 



012345670123456701234567/ 



, ASCIZ /01234 5670123456701234567012345670123/ 



MSG005: .ASCIZ <CRLF>/ERRORS / 



MSG006: .ASCIZ <CRLF> /UNDEFINED TRAP INSTRUCTION/ < 32 > 



MSG009. .ASCIZ <CRLF>/MEMTYPE / 



MSGOlO: .ASCIZ <CRLF>/PROTECT / 



MSGllA: .ASCIZ / 1 



{MEMORY TYPE 

s MEMORY PROTECTED 



1/ 



cvnjAAo nsvii 

MESSAGES 



Nl 

■J MEnORY DIA6. MACRO VOS.Olb Friday 15-Feb-8S 16:10 Page 473-2 



SEQ 0427 





AAA 

040 


AAA 
04U 


AAA 


065694 


A^ 1 

061 


AAA 
04U 


AAA 


065697 


040 


AAA 
040 


OAO 


065642 


040 


OAO 


OA1 
UOl 


065645 


AAA 
040 


040 


OAO 


065650 


v40 


OAO 


OAO 


005099 




om 

UOl 


OOO 


1<| f to U03090 




OAO 


OAO 


U09001 




OAO 


OAO 


U09004 




OAO 


OAO 


U0900 ' 




OAO 


OAO 
V"f V 


U030 ' c 


WOi 


OAO 


OAO 
W"fV 


U030 ' J 


040 


040 
v*»V 


040 
v"*v 




040 


040 
v*tv 


OA? 
voc 




040 


040 

V"»V 


040 
v**v 


\ioj fyjo 


OAO 


040 


040 
v**v 


UO J '11 


OAO 


0A3 
uoo 


OAO 


UO J ' 1*» 


OAO 


OAO 


040 


UO J ' 1 ' 


OAO 


OAO 
V*tV 


040 
v**v 


U03 ' cc 


OAA 


OAO 


040 
v**v 


U03 'c3 


OAO 


OAO 

V"fV 


040 
v**v 


OfcS7'SO 


040 


040 

V"*V 


06^ 


rtA';7'^x 


OAO 


040 
v**v 


040 

V"*V 


nAS7'^ft 

vv3 ' Ov 


040 


040 


040 


l/DO ' "tl 


040 


066 


000 


14777 nAS7AA 


064 


06^ 


066 




0<>7 


060 


061 

wx 




06? 
voc 


063 


064 

W^ 




06 S 

Vv J 


066 


067 

W ' 




0^0 

VvV 


061 
vol 


062 

Wfc 




VvO 


064 


065 

W^ 


UvO f vO 


066 

Vvv 


067 


060 

WV 


V09 r r 1 


061 


062 


063 

W«/ 




064 




066 

WW 


nAS777 


067 

Vv f 




061 

WA 




VwC 


063 


064 

VW^ 




06^ 


066 


067 


V/QvVl V 


060 

VwV 


061 


062 

VWfc 


UvvUlO 


063 
voo 


064 


065 

W J 


UDDvlO 


066 
voo 


067 


060 

WV 


l/OvV/Cl 


061 
vol 


06P 


063 

W 'J 




064 
vo^ 


065 


066 

WW 


a#:#:A57 


Oft7 

VO » 


OAO 


061 

wx 


A|;&ATO 
vwwvOc 


06P 

VvC 


063 

VOW 


064 

vw~ 


VOwv09 


06^ 
vow 


066 

Vww 


067 

WW » 


wwvw^V 


000 

VVV 






1^ » 'Q Vvww^l 


Oftl 

Vvl 


000 

VVV 






Oft7 

Vv ' 


000 

VVV 




147S0 066045 


060 


061 


062 


066050 


063 


064 


065 


066053 


066 


067 


000 


14781 066056 


130 


000 




14782 066060 


040 


000 




14783 066062 


000 


000 




14784 066064 


200 


103 


123 


066067 


122 


040 


040 


066072 


040 


040 


040 



.ASCIZ / 



6/ 



■ASCIZ /4567012345670123456701234567012345670123456701P3456701234567/ 



MSGllB 
MSGllC 



HSG013 
MSG014 
MSG015 



.ASCIZ /I/ 
.ASCIZ /7/ 
.ASCIZ /01234567/ 



.ASCIZ /X/ 

.ASCIZ / / 

.BYTE 0.0 

.ASCIZ <CRLF>/CSR 



s SPACE 

:rOR SINGLE ASCII CHARACTERS L TERMINATOR 



CVnjAAO HSVll 
MESSAGES 



J MEMORY DIAG. 



B2 
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SEQ 0428 



066075 


000 






14785 066076 


040 


040 


A^ A 

040 


066101 


040 


040 


Ad A 

040 


066104 


040 


Ad A 

040 


AAA 

000 


14786 066107 


040 


AAA 

040 


AAA 

000 


14787 066112 


Ail A 

040 


Ail A 

040 


Ail A 

040 


066115 


AAA 

000 






14768 Ooollo 


^AA 

200 


1 A^ 

106 


1 ^1 

123 


066121 


AAA 

040 


1 AV 

103 


117 

117 


066124 


lie 

113 


lie 

113 


1 A 1 
101 


06612' 


tic 
116 


1 AA 

104 


AAA 

040 


066192 


lie 

113 


117 
11 f 


1 AA 

104 


066133 


103 


AAA 
000 




14789 0ool3' 


^AA 


1 AT 

103 


117 

11 ' 


06ol4(: 


lie 

113 


lie 
113 


1 A1 

101 


066 1*D 


11^ 

llD 


1 f\A 

104 


1 3T 
le3 


066150 


AAA 

040 


1 A 1 
101 


1 o^ 
12d 


A^£ 1 d 

066153 


1 A 1 

101 


111 
111 


1 1 A 

114 


A^^ 1 

066 15d 


1 A1 

101 


1 AO 

lOe 


1 1 A 
114 


A^^ 1^1 


1 oe 
103 


A7 0 

VIC 






OAA 

eOO 


o&o 
uoo 


OAO 


A^^ 1 

066 16d 


0 f 3 


040 


1 OS 
103 


0661 '1 


1 TA 

130 


111 

111 


1 OA 
lc4 


14791 Oool f * 


OAA 

eOO 


OA1 
UOl 


OAO 


Uool ' ' 


07e 

U f 3 


OAO 


1 33 
Xcc 


A^^ OAO 


1 oe 
103 


1 01 
lUl 


1 nA 




OAO 


1 OT 


1 3T 
XcO 


A^^OI A 


Icc 






14 ^92 0o6(:ll 


300 
cUO 


OA 3 


OAO 


A^^ 0 1 A 


U f 3 


OAO 


1 1 A 
XX^ 


06621 1 


117 

11 ' 


1 oi 
lOl 


1 OA 
XV^ 




OAO 


1 0T 


1 3T 
XcO 




1 33 
Ice 






14793 06622D 


300 
eOO 


O&T 


OAO 


066231 


o7e 

0/3 


OAO 


1 0S 
XU3 


0OOe34 


1 TO 

13U 


1 OI 


1 1 S 
XX3 


A^^ 

06623 r 


111 

11.' 


1 1 A 


1 OS 
103 


06624<: 


OAO 


IIS 
113 


1 OS 
X03 




lie 

113 


117 

11 ' 


Xcc 




1 T1 

131 






1 ill Oil A£.^Od 


300 
eOO 


OAA 


OAO 


A^COCA 

0OOcD4 


o7e 

U r 3 


o*nj 


1 1 S 
XX3 


A<L<LOC7 

UbbeS r 


117 

11 ' 


1 OA 


111 
XXX 


0662D£ 


1 0& 
lOD 


1 T1 
131 


OAO 




lie 
113 


1 oe 

103 


1 1 S 
XX3 




117 

11 1 


1 33 

lee 


1 T1 
13X 


14 l^o UODe 1 3 


OAA 


o&e 
Oo3 


OAO 


yjbxtd lb 


A7e 
U f 3 


OAO 


1 3T 
IcO 




1 0S 




xv^ 


066304 


103 


124 


040 


066307 


102 


101 


116 


066312 


113 


040 


046 


066315 


040 


124 


105 


066320 


123 


124 




14796 066322 


200 


066 


040 


066325 


075 


040 


124 


066330 


131 


120 


105 



.ASCIZ / / ;8 SPACES 



.ASCIZ / / s2 SPACES 

.ASCIZ / / ;3 SPACES 

, ASCIZ <CRLF>/FS COMMAND MODE/ 



.ASCII <CRLF> /COMMANDS AVAILABLE:/ 



.ASCII <CRLF>/0 = EXIT/ 



.ASCII <CRLF>/1 ' READ CSR/ 



.ASCII <CRLF>/2 = LOAD CSR/ 



.ASCII <CRLF>/3 « EXAMINE MEMORY/ 



.ASCII <CRLF>/4 = MODIFY MEMORY/ 



.ASCII <CRLF>/5 = SELECT BANK 6 TEST/ 



.ASCII <CRLF>/6 » TYPE CONFIG MAP/ 



CVMJAAO MSVll-J MEMORY DIAG. MACRO V05. 
MESSAGES 



066333 


040 


103 


117 


066336 


116 


106 


111 


066341 


107 


040 


115 


066344 


101 


120 




14797 066346 


200 


067 


040 


066351 


075 


040 


123 


066354 


117 


102 


055 


066357 


101 


055 


114 


066362 


117 


116 


107 


066365 


040 


124 


105 


066370 


123 


124 




14798 066372 


200 


070 


Ail A 

040 


066375 


075 


040 


105 


066400 


122 


122 


4 4^ 

117 


066403 


122 


040 


4 OV 

123 


066406 


125 


4 4 P 

115 


4 4 C 

115 


066411 


101 


122 


4 V 4 

131 


14799 066414 


200 


071 


ATC 

075 


066417 


040 


040 


122 


066422 


105 


4 

106 


4 OO 

122 


066425 


105 


123 


4 4 A 

110 


066430 


040 


124 


4 AC 

105 


066433 


123 


4 Oil 

124 




14800 066435 


200 


A£ 1 

061 


A^A 

060 


066440 


075 


Ail A 

040 


1 IV 

123 


066443 


105 


4 Oil 

124 


AJI A 

040 


066446 


106 


4 4 4 

111 


1 1 ji 
114 


066451 


114 


Ail A 

040 


1 AV 

103 


066454 


4 4^ 

117 


1 oc 

125 


11^ 
116 


066457 


124 






14801 066460 


200 


061 


A^ 1 

061 


066463 


075 


Ail A 

040 


105 


066466 


4 4 £ 

llo 


124 


105 


066471 


122 


Ail A 

040 


1 1 T 

113 


066474 


101 


lie 
113 


111 

111 


066477 


113 


1 A 1 

lOj 


1 TO 

132 


066502 


105 


A4 A 

040 


lie 

115 


066505 


4 4^ 

117 


4 Ail 

104 


1 AC 

105 


14802 066510 


200 


A£. 4 

061 


A^ ^ 

0b2 


066513 


075 


Ail A 

040 


1 AC 

105 


066516 


130 


111 


124 


066521 


040 


4 4 7 

113 


1 A 1 

101 


066524 


4 4 P 

115 


4 4 4 

111 


115 


066527 


4 A 4 

101 


4 VO 

132 


1 AC 

105 


066532 


040 


4 4 C 

115 


1 1 *7 

117 


066535 


104 


4 AC 

105 




14803 066537 


200 


A£ 4 

061 


A^T 

063 


066542 


075 


A4 A 

040 


4 Oil 

124 


066545 


125 


122 


4 4 £ 

116 


066550 


040 


4 A9 

103 


4 A 4 

101 


'»oor> 35 






1 nc 


066 J 36 


040 


117 


106 


066561 


106 






14804 066562 


200 


061 


064 


066565 


075 


CIO 


124 


066570 


125 


122 


M6 


066573 


040 


103 


101 



C2 

Friday 15 Feb-85 16:10 Page 473 4 



ASCII <CRLF>/7 = SOB A-LONG TEST/ 



.ASCII <CRLF>/8 « ERROR SUMMARY/ 



.ASCII <CRLF>/9« REFRESH TEST/ 



.ASCII <CRLF>/10- SET FILL COUNT/ 



.ASCII <CRLF>/11» ENTER KAMIKAZE MODE/ 



.ASCII <CRLF>/12« EXIT KAMIKAZE MODE/ 



.ASCII <CRLF>/13« TURN CACHE OFF/ 



.ASCII <CRLF>/14= TURN CACHE ON/ 



D2 



CVMJAAO MSVll 
MESSAGES 



J MEMORY 01 AG. 



066576 


103 


110 


105 


066601 


040 


117 


116 


14805 066604 


200 


061 


065 


066607 


075 


040 


124 


066612 


105 


123 


124 


066615 


040 


123 


105 


066620 


114 


105 


103 


066623 


124 


105 


104 


066626 


040 


102 


101 


066631 


116 


113 


123 


14806 066634 


200 


061 


066 


066637 


075 


040 


124 


066642 


105 


123 


124 


066645 


040 


101 


114 


066650 


114 


040 


102 


066653 


101 


116 


113 


066656 


123 






14807 066657 


200 


061 


067 


066662 


075 


040 


105 


066665 


116 


101 


102 


066670 


114 


105 


040 


066673 


124 


122 


101 


066676 


103 


105 




14808 066700 


200 


061 


070 


066703 


075 


040 


104 


066706 


111 


123 


101 


066711 


102 


114 


105 


066714 


040 


124 


122 


066717 


101 


103 


105 


14809 066722 


015 


012 


000 


14810 066725 


200 


127 


110 


066730 


111 


103 


110 


066733 


040 


103 


123 


066736 


122 


050 


060 


066741 


055 


106 


051 


066744 


077 


040 


000 


14811 066747 


200 


103 


123 


066752 


122 


040 


127 


066755 


117 


122 


104 


066760 


077 


040 


000 


14812 066763 


200 


103 


123 


066766 


122 


040 


104 


066771 


117 


105 


123 


066774 


040 


116 


117 


066777 


124 


040 


105 


067002 


130 


111 


123 


067005 


124 


000 




14813 067007 


200 


103 


117 


067012 


115 


115 


101 


067015 


116 


104 


072 


067020 


000 






14814 067021 


200 


117 


114 


067024 


104 


040 


103 


067027 


123 


122 


040 


067032 


127 


101 


123 


067035 


000 






14815 067036 


200 


103 


123 



MACRO V05.01b Friday 15 Feo 85 16:10 Page 473-5 



.ASCII <CRLF>/15« TEST SELECTED BANKS/ 



SEO 0430 



.ASCII <CRLF>/16= TEST ALL BANKS/ 



.ASCII <CRLF>/17« ENABLE TRACE/ 



.ASCII <CRLF>/18» DISABLE TRACE/ 



.BYTE 15.12.0 



123 MSG028: .ASCIZ <CRLF>/CSR IS NOU/ 



CVMJAAO MSVll-J MEMORY OIAG. 
MESSAGES 



E2 

MACRO VOS.Olb Fridoy 15-Feb-85 16:10 Pag« 475 6 



067041 


122 


040 


111 


067044 


123 


040 


116 


067047 


117 


127 


000 


14816 067052 


200 


105 


130 


067055 


101 


115 


111 


067060 


116 


105 


040 


067063 


115 


105 


115 


067066 


117 


122 


131 


067071 


000 






14817 067072 


200 


102 


101 


067075 


116 


113 


050 


067100 


060 


055 


061 


067103 


067 


067 


051 


067106 


077 


040 


000 


14818 067111 


200 


120 


110 


067114 


111 


123 


111 


067117 


103 


101 


114 


067122 


040 


101 


104 


067125 


104 


122 


105 


067130 


123 


123 


050 


067133 


060 


055 


061 


067136 


067 


067 


065 


067141 


067 


067 


067 


067144 


066 


051 


077 


067147 


040 


000 




14819 067151 


200 


120 


101 


067154 


122 


111 


124 


067157 


131 


040 


101 


067162 


102 


117 


122 


067165 


124 


032 


000 


14820 067170 


200 


124 


111 


067173 


115 


105 


117 


067176 


125 


124 


040 


067201 


124 


122 


101 


0^7204 


120 


032 


000 


14821 Co7207 


200 


102 


131 


067212 


120 


101 


123 


06721S 


123 


111 


116 


067220 


107 


040 


105 


067223 


103 


103 


040 


067226 


124 


105 


123 


067231 


124 


123 


040 


067234 


117 


116 


040 


067237 


102 


101 


116 


067242 


113 


040 


000 


14822 067245 


040 


104 


125 


067250 


105 


040 


124 


067253 


117 


040 


123 


067256 


102 


105 


040 


067261 


114 


117 


103 


067264 


101 


124 


111 


067267 


117 


116 


123 


067272 


000 






14823 067273 


121 


126 


000 


14824 067276 


200 


115 


117 


067301 


104 


111 


106 


067304 


131 


040 


115 



.ASCIZ <CRLF>/EXAMINE MEMORY/ 



.ASCIZ <CRLF>/BANK(0 177)? / 



.ASCIZ <CRLF>/PHYSICAL AD0RESS(0-17757776)? / 



■ASCIZ <CRLF>/PARITY AB0RT/<32> 



.ASCIZ <CRLF>/TIMEOUT TRAP/<32> 



.ASCIZ <CRLF>/BYPASSING ZCC TESTS ON BANK / 



.ASCIZ / DUE TO SBE LOCATIONS/ 



.ASCIZ /QV/ 

.ASCIZ <CRLF>/MODIFY MEMORY/ 



CVnjAAO MSVll 
MESSAGES 



■J MEMORY DIAG. 





1 0S 


1 IS 


117 

X X ( 


MO f OXC 




1 31 
X ^x 


000 

WV 




POO 


117 

X X ( 


114 

A A~ 


WW ( V 


104 


040 
v**v 


104 


« 


101 


124 


101 
X vx 


WW « OCv 


040 


127 
xc * 


101 

XvX 




123 
xc^ 


040 

V~ V 


000 

VW 




200 


104 

A V^ 


101 

A V A 


067337 


124 


101 

A V A 


040 


067342 


111 

AAA 


123 

AC V 


040 


067345 


116 

AAV 


117 

AA • 


127 

AC f 


067350 


040 


000 




14S27 067352 


200 


111 


116 


067355 


120 

AC V 


125 

AC 


124 

AC~ 


067360 


040 


116 

AAV 


105 


067363 


127 

Ab ( 


040 


104 


067366 


101 

A V A 


124 

Ab~ 


101 


067371 


077 


040 


000 


148P8 067374 


200 


123 


105 


067377 


114 


105 


103 


067402 


124 

A 


040 


102 


067405 


101 


116 


113 


067410 


040 


046 


040 


067413 


124 


105 


123 


067416 


124 


000 




14829 067420 

^ ~ V d ? VV ' ~fcV 


200 


102 


101 


067423 


116 


113 


040 


067426 


116 


117 


124 


067431 


040 


101 


103 


067434 


103 


105 


123 


067437 


123 


101 


102 


067442 


114 


105 


000 


14830 067445 

vV VV ' ~~ 


200 


124 


105 


067450 


123 


124 


050 


067453 


060 


055 


064 


067456 

W • ~ ^ V 


067 


051 


077 


067461 

VV ' ~V A 


040 


000 




14831 067463 


200 


124 


105 


067466 

W ' ~vv 


123 


124 


040 


067471 


060 


040 


104 


067474 


101 


124 


101 


067477 


040 


111 


123 


067502 

w ■ ^vc 


077 


040 


000 


14832 067505 

X~VwC w > ^v^ 


200 


124 


117 


067510 

W ' ^AV 


040 


105 


123 


067513 


103 


101 


120 


067516 


105 


040 


124 


067521 


131 


120 


105 


067524 


040 


101 


116 


067527 


131 


040 


113 


067532 


105 


131 


200 


067535 


012 


012 


000 


14833 067540 


200 


124 


105 


067543 


123 


124 


040 


067546 


103 


117 


115 


067551 


120 


114 


105 


067554 


124 


105 


000 
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MSG037: .ASCIZ <CRLF>/OLO DATA WAS / 



MSG038: .ASCIZ <CRLF>/OATA IS NOW / 



MSG039: .ASCIZ <CRLF>/INPUT NEW DATA? / 



MSG040: .ASCIZ <CRLF>/SELECT BANK £ TEST/ 



SEQ 0432 



MSG041: .ASCIZ <CRLF>/BANK NOT ACCESSABLE/ 



MSG042: .ASCIZ <CRLF>/TEST(0-47)? / 



MSG043: .ASCIZ <CRLF>/TEST 0 DATA IS? / 



MSG046: .ASCIZ <CRLF>/TO ESCAPE TYPE ANY KEY/<CRLF><12><12> 



MSG047: .ASCIZ <CRLF>/TEST COMPLETE/ 



CVMJAAO MSVll-J MEMWY DIAG. 
MESSAGES 



G2 
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SEQ 0433 



14834 067557 


040 


116 


117 


067562 


124 


040 


101 


067565 


126 


101 


111 


067570 


114 


101 


102 


067573 


114 


105 


040 


067576 


116 


117 


127 


067601 


040 


055 


040 


067604 


124 


122 


131 


067607 


040 


114 


101 


067612 


124 


105 


122 


067615 


041 


000 




14835 067617 


200 


102 


101 


067622 


116 


113 


040 


067625 


122 


105 


121 


067630 


125 


111 


122 


067633 


105 


123 


040 


067636 


122 


105 


114 


067641 


117 


103 


101 


067644 


124 


111 


117 


067647 


116 


000 




14836 








14837 067652 


120 


117 


127 


067655 


105 


122 


040 


067660 


122 


105 


103 


067663 


117 


126 


105 


067666 


122 


131 


000 


14838 067671 


200 


123 


117 


067674 


102 


055 


101 


067677 


055 


114 


117 


067702 


116 


107 


040 


067705 


124 


105 


123 


067710 


124 


000 




14839 067712 


200 


102 


105 


067715 


114 


114 


040 


067720 


075 


040 


105 


067723 


101 


103 


no 


067726 


040 


120 


101 


067731 


123 


123 


040 


067734 


103 


117 


115 


067737 


120 


114 


105 


067742 


124 


105 


000 


14840 067745 


200 


040 


040 


067750 


103 


123 


122 


067753 


040 


040 


040 


067756 


040 


103 


123 


067761 


122 


040 


056 


067764 


056 


056 


000 


14841 067767 


077 


077 


077 


067772 


077 


077 


077 


067775 


000 






14842 067776 


111 


116 


120 


070001 


125 


124 


040 


070004 


115 


125 


123 


070007 


124 


040 


102 


070012 


105 


040 


101 


070015 


000 






14843 070016 


116 


040 


117 



• EVEN 



.ASCIZ <CRLF>/ CSR 



CSR 



.ASCIZ /??????/ 

.ASCIZ /INPUT MUST BE A/ 



117 MSG063: .ASCIZ /N OCTAL / 



CVMJAAO MSVll-J MEMORY OIAG. 
MESSAGES 



070021 


103 


124 


101 


070024 


114 


040 


000 


14844 070027 


116 


125 


115 


070032 


102 


105 


122 


070035 


200 


000 




14845 070037 


040 


104 


105 


070042 


103 


111 


115 


070045 


101 


114 


040 


070050 


000 






14846 070051 


200 


105 


122 


070054 


122 


117 


122 


070057 


123 


040 


076 


070062 


040 


062 


060 


070065 


040 


055 


040 


070070 


101 


102 


117 


070073 


122 


124 


111 


070076 


116 


107 


040 


070101 


106 


117 


122 


070104 


040 


130 


130 


070107 


104 


120 


040 


070112 


103 


110 


101 


070115 


111 


116 


000 


14847 070120 


106 


101 


124 


070123 


101 


114 


040 


070126 


000 






14848 070127 


113 


040 


127 


070132 


117 


122 


104 


070135 


123 


040 


117 


070140 


106 


040 


115 


070143 


105 


115 


117 


070146 


122 


131 


040 


070151 


124 


117 


124 


070154 


101 


114 


200 


070157 


000 






14849 070160 


200 


122 


105 


070163 


106 


122 


105 


070166 


123 


110 


040 


070171 


124 


105 


123 


070174 


124 


000 




14850 070176 


200 


122 


105 


070201 


114 


117 


103 


070204 


101 


124 


111 


070207 


117 


116 


040 


070212 


116 


117 


124 


070215 


040 


120 


117 


070220 


123 


123 


111 


070223 


102 


114 


105 


070226 


032 


000 




14851 070230 


200 


040 


040 


070233 


102 


101 


116 


070236 


113 


040 


040 


070241 


105 


122 


122 


070244 


117 


122 


123 


070247 


200 


000 




14852 070251 


200 


105 


116 


070254 


104 


040 


120 


070257 


101 


123 


123 
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MSG064: .ASCIZ /NUMBER/ <CRLF> 



MSG065: .ASCIZ / DECIMAL / 



MSG066: .ASCIZ <CRLF>/ERRORS > 20 - ABORTING FOR XXDP CHAIN/ 



SEQ 0434 



MSG067: .ASCIZ /FATAL / 



MSG070: .ASCIZ /K WORDS OF MEMORY T0TAL/<CRLF> 



MSG073: .ASCIZ <CRLF>/REFRESH TEST/ 



MSG075: .ASCIZ <CRLF>/REL0CATI0N NOT P0SSIBLE/<32> 



MSG076: .ASCIZ <CRLF>/ BANK ERRORS/ <CRLF> 



MSG077: .ASCIZ <CRLF>/END PASS #/ 



CVMJAAO MSVll 
MESSAGES 



■J MEMOfiY DIAG. 
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SEQ 0435 



070262 


040 


043 


000 


14853 070265 


040 


105 


122 


070270 


122 


117 


122 


070273 


050 


123 


051 


070276 


040 


104 


105 


070301 


124 


105 


103 


070304 


124 


105 


104 


070307 


200 


000 




14854 070311 


200 


106 


111 


070314 


114 


114 


040 


070317 


103 


117 


125 


070322 


116 


124 


050 


070325 


117 


103 


124 


070330 


101 


114 


051 


070333 


077 


040 


000 


14855 070336 


200 


113 


105 


070341 


122 


116 


105 


070344 


114 


040 


123 


070347 


124 


101 


103 


070352 


113 


000 




14856 070354 


200 


123 


125 


070357 


120 


105 


122 


070362 


126 


111 


123 


070365 


117 


122 


040 


070370 


123 


124 


101 


070373 


103 


113 


000 


14857 070376 


200 


125 


123 


070401 


105 


122 


040 


070404 


123 


124 


101 


070407 


103 


113 


000 


14858 070412 


040 


111 


123 


070415 


040 


105 


115 


070420 


120 


124 


131 


070423 


000 






14859 070424 


122 


105 


114 


070427 


117 


103 


101 


070432 


124 


105 


104 


070435 


040 


040 


000 


14860 070440 


102 


101 


116 


070443 


113 


075 


000 


14861 070446 


040 


040 


124 


070451 


105 


123 


124 


070454 


075 


000 




14862 070456 


200 


105 


116 


070461 


124 


105 


122 


070464 


111 


116 


107 


070467 


040 


113 


101 


070472 


115 


111 


113 


070475 


101 


132 


105 


070500 


040 


115 


117 


070503 


104 


105 


000 


14863 070506 


200 


114 


105 


070511 


101 


126 


111 


070514 


116 


107 


040 


070517 


113 


101 


115 


070522 


111 


113 


101 


070525 


132 


105 


040 



.ASCIZ / ERROR(S) DETECTED/<CRLF> 



.ASCIZ <CRLF>/FILL COUNT(OCTAL)? / 



, ASCIZ <CRLF> /KERNEL STACK/ 



.ASCIZ <CRLF>/SUPERVISOR STACK/ 



.ASCIZ <CRLF>/USER STACK/ 

.ASCIZ / IS EMPTY/ 

.ASCIZ /RELOCATED / 

.ASCIZ /BANK«/ 

.ASCIZ / TEST«/ 

, ASCIZ <CRLF>/ENTERING KAMIKAZE MODE/ 



, ASCIZ <CRLF>/LEAVING KAMIKAZE MODE/ 



CVMJAAO MSVll- 
MESSAGES 



J MEMORY DIAG. 
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SEQ 0436 



070530 


115 


117 


104 


070533 


105 


000 




14864 070535 


200 


114 


105 


070540 


101 


126 


111 


070543 


116 


107 


040 


070546 


106 


123 


040 


070551 


115 


117 


104 


070554 


105 


200 


000 


14865 070557. 


032 


000 




14866 070561 


200 


105 


116 


070564 


124 


105 


122 


070567 


040 


102 


101 


070572 


116 


113 


123 


070575 


040 


055 


040 


070600 


125 


123 


105 


070603 


040 


116 


125 


070606 


115 


102 


105 


070611 


122 


040 


062 


070614 


060 


060 


040 


070617 


124 


117 


040 


070622 


124 


105 


122 


070625 


115 


111 


116 


070630 


101 


124 


105 


070633 


000 






14867 070634 


200 


103 


101 


070637 


103 


110 


105 


070642 


040 


111 


123 


070645 


040 


117 


106 


070650 


106 


000 




14868 070652 


200 


103 


101 


070655 


103 


110 


105 


070660 


040 


111 


123 


070663 


040 


117 


116 


070666 


040 


050 


105 


070671 


130 


103 


105 


070674 


120 


124 


040 


070677 


104 


125 


122 


070702 


111 


116 


107 


070705 


040 


101 


103 


070710 


124 


125 


101 


070713 


114 


040 


120 


070716 


101 


124 


124 


070721 


105 


122 


116 


070724 


123 


u51 


000 


14869 070727 


200 


117 


116 


070732 


114 


131 


040 


070735 


123 


105 


114 


070740 


105 


103 


124 


070743 


105 


104 


040 


070746 


102 


101 


116 


070751 


113 


123 


040 


070754 


127 


111 


114 


070757 


114 


040 


102 


070762 


105 


040 


124 


070765 


105 


123 


124 


070770 


105 


104 


000 


14870 070773 


200 


101 


114 



.ASCIZ <CRLF> /LEAVING FS MODE/<CRLF> 



MSG104: .BYTE 32.0 

MSG105: .ASCIZ <CRLF> /ENTER BANKS 



; CONTROL Z 
USE NUMBER 200 TO TERMINATE/ 



MSG106: .ASCIZ <CRLF>/CACHE IS OFF/ 



MSG107: .ASCIZ <CRLF>/CACHE IS ON (EXCEPT DURING ACTUAL PATTERNS)/ 



MSGllO: .ASCIZ <CRLF>/ONLY SELECTED BANKS WILL BE TESTED/ 



MSGlll: .ASCIZ <CRLF>/ALL BANKS WILL BE TESTED/ 



CVMJAAO MSVll-J MEMWY OIAG. 
MESSAGES 



l<2 
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SEQ 0437 



070776 


114 


040 


102 


071001 


101 


116 


113 


071004 


123 


040 


127 


071007 


111 


114 


114 


071012 


040 


102 


105 


071015 


040 


124 


105 


071020 


123 


124 


105 


071023 


104 


000 




14871 071025 


113 


040 


117 


071030 


106 


040 


121 


071033 


055 


102 


125 


071036 


123 


040 


120 


071041 


101 


122 


111 


071044 


124 


131 


040 


071047 


115 


105 


115 


071052 


117 


122 


131 


071055 


200 


000 




14872 071057 


113 


040 


117 


071062 


106 


040 


105 


071065 


103 


103 


040 


071070 


115 


105 


115 


071073 


117 


122 


131 


071076 


200 


000 




14873 071100 


200 


040 


040 


071103 


040 


061 


061 


071106 


057 


070 


064 


071111 


000 






14874 071112 


200 


040 


040 


071115 


040 


061 


061 


071120 


057 


070 


063 


071123 


000 






14875 071124 


200 


040 


040 


071127 


040 


116 


117 


071132 


000 






14876 071133 


040 


103 


101 


071136 


103 


110 


105 


071141 


040 


101 


126 


071144 


101 


111 


114 


071147 


101 


102 


114 


071152 


105 


000 




14877 071154 


040 


103 


101 


071157 


103 


110 


105 


071162 


040 


102 


131 


071165 


120 


101 


123 


071170 


123 


105 


104 


071173 


000 






14878 071174 


200 


103 


123 


071177 


122 


040 


116 


071202 


125 


115 


102 


071205 


105 


122 


040 


14879 071210 


000 






14880 071211 


040 


103 


117 


071214 


116 


124 


122 


071217 


117 


114 


123 


071222 


040 


124 


117 


071225 


117 


040 


115 


071230 


101 


116 


131 



MSG112: .ASCIZ /K OF Q-BUS PARITY MEMORY/<CRLF> 



MSG113: .ASCIZ /l< OF ECC MEMORY/<CRLF> 



M1184: .ASCIZ <CRLF>" 11/84" 



MSG117: .ASCIZ <CRLF>" 11/83" 



MSG119: .ASCIZ <CRLF>/ NO/ 



MSG120: .ASCIZ / CACHE AVAILABLE/ 



MSG121: .ASCIZ / CACHE BYPASSED/ 



MSG122: .ASCII <CRLF>/CSR NUMBER / 



MSGA122: .BYTE 0 

.ASCIZ / CONTROLS TOO MANY BANKS/ 



CVHJAAO MSVll- 
MESSAGES 



J MEMORY DIAG. 



L2 
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071233 


040 


102 


101 


071236 


116 


113 


• A9 

123 


071241 


000 






14801 071242 


040 


4 AA 

120 


• A 4 

101 


071245 


123 


4 A9 

123 


fl AC 

105 


071250 


4 AV 

123 


Ad A 

040 


• A9 

103 


071253 


117 


115 


120 


071256 


114 


4 AP 

105 


124 


071261 


4 AC 

105 


4 f\M 

104 


AAA 

000 


14882 071264 


AAA 

200 


1 OA 

120 


4 AA 

122 


071267 


117 


4 AT 

107 


4 AA 

122 


071272 


4 A 4 

101 


4 4 C 

115 


Ail A 

040 


071275 


1 AT 

103 


4 OT 

123 


4 OO 

122 


AT 4 VAA 

071300 


040 


4 AT 

103 


4 4 T 

117 


AT 4 VAV 

071303 


123 


4 4 il 

114 


1 AA 
104 


AT 4 VA£ 

071306 


Ail A 

040 


4 4 £. 

116 


4 4 T 

117 


AT 1 V 4 4 

071311 


4 

124 


Ail A 

040 


4 AO 

102 


AT 4 V 4 il 

071314 


4 AC 
105 


Ayi A 
040 


4 Ail 
104 


AT 4 V 4 T 

071317 


4 AC 

105 


4 Oil 

124 


4 AC 

105 


AT 4 

071322 


122 


4 4 C 

115 


4 4 4 

111 


AT4 VOC 

071325 


4 4 £. 
116 


4 AC 

105 


4 AA 

104 


AT 4 WA 

071330 


AAA 
000 






14003 071331 


^AA 

200 


4 Oil 

124 


4 OO 

122 


AT 4 TTA 
071334 


4 A 4 
101 


1 AT 
103 


1 AC 
105 


AT 1 

071337 


Ail A 

040 


1 AC 

105 


1 1 A. 

llo 


AT 4 Vil ^ 

071342 


4 A4 
101 


4 AO 

102 


4 4 A 
114 


AT 4 Til C 

071345 


4 AC 
105 


4 AA 

104 


AAA 


tilOOil AT4TCA 

14004 071350 


2U0 


4 OA 

124 


1 OO 

122 


AT 4 Id 

071353 


mi 


1 AT 
lUd 


1 AC 
1U3 


AT 4 1C£. 

071356 




1 AA 
lO** 


111 

111 


A^ 4 V£. 1 

071361 


123 


1 A1 
101 


1 AO 
102 


071 3e4 


1 1 A 


1 AC 


1 AA 
1U4 


A^ 4 

071367 


nnn 
UUU 






tilOBC AT4VTA 

14005 071370 


eUU 


3AA 


U^U 


AT 4 TTT 

071373 




AAA 


AAA 
U^U 


AT 4 VT£. 

071376 


AAA 


AAA 


AAA 
U'fU 


AT 4 ilA4 
071401 


AAA 

04U 


AAA 


AAA 
U'fU 


AT 4 A AJI 

071404 


Ail A 

040 


AAA 

040 


AAA 
040 


AT 1 il AT 

071407 


AAA 

040 


AAA 
04 U 


1 AT 
103 


AT 4 il 4 9 

071412 


123 


1 oo 
122 


AAA 
U«*U 


AT 4 il 4 C 

071415 


1 4 C 

115 


1 A1 
lOl 


1 OA 
12U 


AT 4 A ^A 

071420 


OAA 

2U0 


AAA 

000 




lilOfiC AT4il^^ 

140S6 071422 


OAA 

200 


AAA 

040 


1 AT 
103 


AT 4 il 

071425 


126 


4 4 C 

115 


1 1 o 
112 


Of 1430 


1 A 1 

lUl 


Ail A 
MOM 


AAA 
UnU 


0 f 1433 


AAA 


1 AC 
105 


1 AT 
103 


AT 4 AT^ 

071430 


4 AT 
103 


AC7 
05 I 


4 OA 

120 


AT 4 ilil 4 

071441 


4 A 1 
101 


4 OO 

122 


14 4 

111 


AT 1 AAA 

0 f mnH 


4 OA 

124 


4 T 4 

131 


AAA 

04 U 


071447 




X\lJ 




071452 


117 


122 


131 


071455 


040 


104 


111 


071460 


101 


107 


116 


071463 


117 


123 


124 


071466 


111 


103 


000 


14887 071471 


200 


200 


000 


14888 071474 


120 


122 


117 



■ASCIZ / PASSES COMPLETED/ 



.ASCIZ <CRLF>/PROGRAM GSR COULD NOT BE DETERMINED/ 



.ASCIZ <CRLF>/TRACE ENABLED/ 



, ASCIZ <CRLF>/TRACE DISABLED/ 



.ASCIZ <CRLF><CRLF>/ 



CSR MAP/<CRLF> 



.ASCIZ <CRLF>" CVMJAO ECC/PARITY MEMORY DIAGNOSTIC" 



.ASCIZ <CRLF><CRLF> 

, ASCIZ /PROCESSOR NOT SUPPORTED BY THIS DIAGNOSTIC/ 



CVMJAAO MSVll-J MEMORY DIAG. 
MESSAGES 
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071477 


103 


105 


123 




071502 


123 


117 


122 




071505 


040 


116 


117 




071510 


124 


040 


123 




071513 


125 


120 


120 




071516 


117 


122 


124 




071521 


105 


104 


040 




071524 


102 


131 


040 




071527 


124 


110 


111 




071532 


123 


040 


104 




071535 


111 


101 


107 




071540 


116 


117 


123 




071543 


124 


111 


103 




071546 


000 






14889 


071547 


200 


125 


116 




071552 


111 


102 


125 




071555 


123 


040 


115 




071560 


105 


115 


117 




071563 


122 


131 


040 




071566 


127 


111 


114 




071571 


114 


040 


116 




071574 


117 


124 


040 




071577 


102 


105 


040 




071602 


124 


1 AC 

lOD 






071605 


124 


105 


104 




071610 


200 


000 




14890 










14896 


071612 








14897 


071612 








14898 


071612 


010322 






14902 




000200 







SEQ 0439 



NOUBMT: .ASCIZ <CRLF>/UNIBUS MEMORY WILL NOT BE TESTED/<CRLF> 



END: 



.EVEN 
UEND 

.PRINT 60000 -SUPLIMIT 
.END START3 



{SUPERVISOR ADDRESSES LEFT 



CVnjAAO nSVll-J MEflORY 01 AG 









ABOPT 


www 


BST7F 


ARORTf 


00? 144 


BO 

DV 


ARORTl 


WW 


Bl 


ABORTP 


000046 

/V W^W 


BIO 




00P116 

WK X XV 


BlOO 

U A W 


ACTFLA 


WC 


BlOl 


ADORES 


00P0S4 


BIO? 


ANA2 




B103 

0 A V w 


APTOOU 


040720 


B104 


APTECC 


002424 


BIOS 


APTFLA 


002352 


B106 


APT HAN 


014126 


B107 


APTHLT 


040766 


Bll 


APTPAR 


002422 


B12 


APT SI Z 


002444 


B13 


BACK 


051530 


B14 


BACKGN 


032630 


B15 


BAD 


002052 


B16 


BADPC 


002022 


B17 


BAOPSU 


002032 


B2 


BADSP 


002026 


B20 


BADSTA 


034152 


B21 


BADXOR 


002060 


B22 


BA02 


002054 


B23 


BA03 


002056 


B24 


6AFPAF 


014262 


B25 


BAFPAR 


014370 


626 


BAKPAT 


002632 


B27 


BANK 


002102 


BS 


BANKIN 


002104 


BSO 


BANKMO 


037442 


B31 


BANKOK 


040456 


B32 


BAUPAF 


014476 


BSS 


BAUPAR 


014626 


BS4 


BGTEST 


027610 


BSS 


BITNO 


002324 


B36 


BITO ■ 


000001 


B37 


BITl ■ 


000002 


B4 


BITIO ■ 


002000 


B40 


BITll ■ 


004000 


B41 


BIT12 ■ 


010000 


B42 


BIT13 " 


020000 


B43 


BIT14 • 


040000 


B44 


BIT15 • 


100000 


B45 


BIT2 • 


000004 


B46 


BITS • 


000010 


B47 


6IT4 ■ 


000020 


BS 


BITS ■ 


000040 


BSO 


3IT6 • 


000100 


B51 


BIT7 • 


000200 


B52 


BIT8 • 


000400 


653 


BIT9 • 


001000 


654 


BLOCKl 


040770 


855 


BL0CK2 


041010 


B56 


BLOCKS 


041024 


657 


BhFLAG 


002130 


66 


BRGOBB 


027612 


B60 
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002374 


B61 

OVA 


035112 

JX AC 


004652 


B62 


VWa/A AV 


00S6S6 


B63 




012262 


664 


035326 


045566 


B6S 


036444 


046040 


B66 


03645? 


046046 


B67 


036602 


053S22 


B7 


012220 


053526 


B70 


036616 


053624 


671 


043510 


053716 


672 


043746 


054002 


673 


044230 


013010 


674 


044524 


013060 


675 


044524 


013122 


676 


044622 


013400 


677 


045562 


014172 


CACHKF 


002550 


015610 


CACHKN 


002544 


016060 


CACHOF> 


104424 


006050 


CACHON' 


104423 


016066 


CACHVE- 


000114 


016104 


cecsR -> 


104474 


016146 


C8ITS 


002316 


016220 


C6REG - 


104513 


021642 


C61CSR> 


104475 


021646 


CHECK 


002314 


022026 


CHKDIS> 


104504 


022034 


CHKTRP 


032220 


006120 


CHKIOI- 


104505 


022264 


CKENO 


055056 


025750 


CKSUR - 


104410 


026140 


CLRCSR" 


104502 


026176 


CLREX 


007342 


026620 


CLRHEn 


007232 


026656 


CLRICS- 


104503 


026672 


CHD16A 


044610 


027012 


CM016L- 


000074 


006400 


CHDSe 


042752 


027172 


cnosc 


043246 


027214 


Cn076 


043504 


027742 


CHD7C 


043560 


030102 


criD9B 


044224 


030140 


CHD9C 


044300 


030432 


C0NF6E 


002«r50 


030646 


CONFIE 


003670 


031050 


CONFIG 


002664 


006434 


CONTFL 


002222 


031224 


CONTRL> 


177746 


031244 


CONTS 


055226 


031254 


CONTSl 


054570 


031572 


CQNTS2 


055230 


031742 


CONTSS 


047340 


031756 


CONTT 


055152 


032022 


COUNT 


002370 


034746 


CPERRF 


052314 


011544 


CPSAVE 


052312 


034752 


CPUBIT 


002106 
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SEQ 0440 



CPUFRRa 


177766 


OHl 


vo^x 1 c 


CR ■ 


000015 

WW A ^ 


OHM 


ft64?67 




000?00 
wvc w 






CSR 


00? 150 

WC A^V 


DH16 




CSRADD« 


17?100 

A f C AW 


DH1Q 


06450? 


CSRBMP 


0060?4 


OH? 


06'^S'^6 


CSRCAS 


017004 

VA • 


DHPO 
i/ncv 


064507 


CSRFBA 


002232 


0H?3 


064 S66 


CSRFIR 

WW**! At* 


002226 




064645 


CSRHOL 


002526 


DH25 


064714 

W^ * A^ 


CSRINC 


002330 


DH26 


06475? 


CSRINF 


002462 


0H27 


064770 


CSRINT 


002236 


0H3 


063561 


CSRLAS 


002230 


0H30 


065044 


CSRLBA 


002234 


0H5 


063615 


CSRLOO 


002332 


0H6 


063674 


CSRMAP 


006034 


0H7 


063741 


CSRNO 


002152 


DIAGFL 


002004 


CSROUT 


035314 


DISPLA 

VAW' wn 


002640 

Wfc 


CSRSTU- 


000021 


DISPRE' 


000174 


CSRIS 


002322 


0ISPT6 


013600 

V A W 


CTEST 


006714 


DOBACK 


014162 


CTLKVE 


002146 


DONE 


006700 


DATARG- 


177754 


DSUR ' 


177570 


DAT6UF 


002242 


DTI 


060144 


D6ENSK 


002256 


DTIO 


060264 


DOISP * 


177570 


DTll 


060306 

V www 


DEENER- 


104421 


DT12 


060314 


DETAIL 


053266 


DT13 


060320 


DETFLA 


002220 


DT14 


060342 


DETPSU 


002216 


DT16 


060360 

Www »/ww 


DETRO 


002200 


0T17 


060410 


DETRl 


002202 


DT2 


060156 


0ETR2 


002204 


DT20 


060416 


DETR3 


002206 


DT22 


060426 


DETR4 


002210 


DT23 


060434 


DETRS 


002212 


0T24 


0604S6 


OETSP 


002214 


DT25 


060476 

WW^ 1 W 


OETl 


053756 


0T26 


060S10 

WWW^ A W 


OFl 


060556 


0T27 


060516 

WWW J Aw 


OFll 


060701 


DT3 


06016? 

WVW Ave 


DF13 


060712 


0T3O 


060536 


DF14 


060722 


DT4 


060172 


DFIS 


060731 


DT5 


060202 

WWWfcWb 


DF16 


060740 


DT6 


060220 


DF2 


060557 


DT7 


060234 


0F3 


060603 


OUftlY 


002176 


DF4 


060616 


DUMPCS* 


000103 


DFS 


060631 


ECCDIS- 


104470 


DF6 


060644 


ECCINI- 


104472 


0F7 


060657 


ECCIOI- 


104471 


DF8 


060672 


ECCIIN- 


104473 


DF9 


060674 


EMTSAV 


003670 


OHl 


063501 


EMTVEC- 


000030 


DHIO 


064051 


EHll 


061247 


OHll 


06414^ 


Eni2 


061271 


DH12 


064165 


EfllS 


061315 
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Syabol 


tabic 




Em4 


061347 


EO 


EM15 


061413 


El 


EMI 7 


061461 


ElO 


EM19 


061521 


ElOO 


EM2 


060747 


ElOl 


En20 


061573 


E102 


Emi 


061652 


E103 




061706 


E104 


£mi 


061733 


E105 


EM24 


061762 


E106 


EM25 


062041 


E107 


Eme 


062066 


Ell 


EM27 


062137 


E12 


EM29 


062227 


E13 


Et13 


061005 


E14 


En30 


062311 


E15 


EM32 


062421 


E16 


EM33 


062526 


E17 


Eri35 


062634 


E2 


EM36 


062721 


E20 


EM4 


061037 


E21 


EM40 


062770 


E22 


Ef15 


061105 


E23 


EM50 


063042 


E24 


EM51 


063076 


E25 


EnS2 


063146 


E26 


EM53 


063173 


E27 


EM55 


063222 


E3 


EM56 


063243 


E30 


EM57 


063275 


E31 


Erie 


061162 


E32 


Ef160 


063343 


E33 


Ef161 


063405 


E34 


En62 


063426 


E35 


EM7 


061207 


E36 


ENASBE- 


104506 


E37 


ENAISB- 


104507 


E4 


ENO 


071612 


E40 


ENOAOO 


002562 


E41 


ENOFLG 


002564 


E42 


ENERGI- 


104420 


E43 


ENEXBK 


040446 


E44 


EQFLAG 


002132 


E45 


ERRAOO 


002460 


E46 


ERRGEN- 


104512 


E47 


ERRMAX 


002554 


E5 


ERROR ' 


104000 


E50 


ERRPC 


002020 


E51 


ERRPSU 


002030 


E52 


ERRSP 


002024 


E53 


ERRVEC- 


000004 


E54 


EVEN 


002364 


E55 


EXBANK 


040052 


E56 


EXCM03 


042040 


E57 


EXCH04 


042360 


E6 


EXIT 


040604 


E60 


EXITS 


040610 


E61 
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004700 


E62 


035164 


005776 


E63 


035356 


012346 


E64 


035356 


045622 


E65 


036602 


046102 


E66 


036562 


046102 


E67 


037016 


053570 


E7 


012362 


053570 


E70 


036730 


053654 


E71 


043552 


053750 


E72 


044050 


054034 


E73 


044272 


013052 


E74 


044564 


013120 


E75 


044564 


013150 


E76 


044640 


013520 


E77 


045622 


014260 


FASTCI- 


177640 


015630 


FATALI 


002064 


016414 


FCMOlO 


044364 


006114 


Fcrioii 


044412 


016374 


FCM012 


044434 


016324 


FCMD13 


044454 


016324 


FCMD14 


044476 


016274 


FCM015 


044514 


022004 


FCMD16 


044600 


021770 


FCM017 


044642 


022172 


FCMD18 


044656 


022156 


FIELDS 


041054 


006210 


FINOBA* 


000067 


022342 


FINTI 


007214 


02e034 


FIRST « 


060000 


026414 


FLIPLO 


002616 


026402 


FLIPUA 


032500 


027164 


FLUSH 


013672 


027150 


FSCMOO 


041252 


026764 


FSCWl 


041354 


027134 


FSCW2 


041464 


006622 


FSCMD3 


041632 


027210 


FSCt«4 


042106 


027234 


FSCM05 


042426 


030064 


FSCW)6 


043344 


030270 


FSCM07 


043352 


030256 


FSCM08 


043644 


030536 


FSCMD9 


044072 


031022 


fSlHFL 


002442 


031220 


FSPAT 


043126 


006612 


FSSTAC 


002306 


031542 


FSl 


041140 


031524 


FS7FLA 


002446 


031510 


FULLRE 


002542 


031726 


GBLENG' 


000076 


032212 


GETCSR 


032674 


032202 


GETDAT 


045252 


032170 


GETDAl 


045350 


035020 


GETDIS 


051430 


011676 


GOOD 


002044 


035020 


G0002 


002046 


035164 


G0003 


002050 
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GTSUR - 104407 
HEADER 002612 
HIPAT 040510 
HOLDLO- 000016 
NT • 000011 
I 002452 
IBSAVE 052310 
nil « 177777 
ILLCSR 012724 
IMPTES 011750 
INCBNK 040520 
INCPAT 040474 
INCRPT 040474 
INHBAN 002540 
INHECC 002536 
INTFLA 002136 
INT64K 002140 
INVALI- 104511 
lOTVEC- 000020 
JMPRLl 037076 
KAMIKA 002006 
KAMITE 024234 
KDIAG - 000010 
KDPARO* 172360 
KDPAR6- 172374 
KDPAR7- 172376 
KERNEL- 104417 
KERSTK- 002000 
KFLAG 002530 
KIPARO* 172340 
KIPAR4- 172350 
KIPAR5- 172352 
KIPAR6- 172354 
KIPDRO- 172300 
KflAP « 104422 
KPFLAG 002114 
KSIZE 002376 
KSTACK 002574 
LAST - 157776 
LASTBA 002556 
LASTBL 002560 
LASTER 002016 
LBLSO « 000530 
LBLSl - 000107 
LBLS2 - 000520 
LBLS3 - 000513 
LBLS4 - 000366 
LBLS5 « 000370 
LBLS6 - 000023 
LCSROU- 000063 
LCSRRE- 000101 
LCSRSA- 000077 
LEGALC- 000010 
LF « 000012 
LINKl 002522 
LINK2 002524 
LKS « 177546 



SEQ 0441 

LOADBA 002432 

LOADCS- 104425 

LOADER- 000065 

LOADHO 002576 

LOOP 013552 

LSIZE 002400 

LSTM - 000000 

LUD6E - 000061 

LUS6E - 000057 

LO 004662 

LI 004724 

LIO 005222 

LlOO 012334 

LlOl 012340 

L102 013042 

L103 013036 

L104 013042 

L105 013136 

L106 013206 

L107 013352 

Lll 005230 

LllO 013552 

Llll 013510 

L112 013426 

L113 013430 

L114 013470 

L115 013504 

L116 013550 

L117 013552 

L12 005300 

L120 013666 

L121 013776 

L122 014006 

L123 014156 

L124 014156 

L125 014244 

L126 014356 

L127 014464 

L13 005274 

L130 014614 

L131 014744 

L132 015074 

L133 015246 

L134 015376 

L135 015550 

L136 015630 

L137 015666 

L14 005300 

L140 015676 

L141 016324 

L142 016306 

L143 016356 

L144 016626 

L145 016736 

Li46 017074 

L147 017122 

LIS 005610 
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Symbol table 



L150 


017126 




026764 


L334 


033434 


L416 


043044 


L501 


051604 


L151 


017130 


L24 


AA£ 4 f £ 

006156 


L335 


A99f 9A 

033530 


L417 


0430 * 


L502 


052044 




Al ^ t 

017174 




026714 


L336 


A wet A 

033520 


L42 


AAf 

0065r 


L503 


052000 


L155 


017230 


L241 


A0£70£ 

026726 


L337 


033526 


■ M t A 

L420 


04307j 


L504 


052024 


L1S4 


017234 


1 OA O 

L242 


026744 


L34 


006374 


L421 


043422 


L505 


052044 


1 1 cc 


A1 70T£ 

01 r23o 


1 OAT 

L243 


026752 


1 V il A 

L340 


033536 


L422 


Ail V ii 'yjk 

043424 


L506 


052064 




Af 1Ai\A 

01 f404 


1 OA A 

L244 


026776 


1 TA 1 

L341 


033562 


L423 


Ail VPVf 

043536 


L507 


052256 




A1 77£il 

017764 


1 OA C 

L243 


A 0»7 * T A 

027134 


L342 


033664 


L424 


Ail M ACA 

044050 


L51 


006700 


Llo 


AAC£ 1 A 

005610 


1 OA£ 

L246 


A07ATA 

027034 


1 TAT 

L343 


A9 M C V ^ 

034532 


L425 


Ail A A9il 

044034 


LSIO 


052126 


1 1 £.A 

LloU 


AOA^ 7A 

yJEvS /O 


1 OA 7 


A O 7 AA C 

027046 


1 T A A 

L344 


ATA CA A 

034540 


L426 


Ail il AAil 

044004 


L511 


052254 


LlOl 


AOAAAA 


1 oc 
L23 


AAC f AC 

006146 


1 TAC 

L343 


ATA 77t 

034776 


L427 


AJI JI 4 il ^ 

044142 


1 C 4 t 

L512 


052204 


1 1 &3 
Lloc 




1 OCA 


A07 * AA 

Uc r 100 


1 TA C 

L346 


ATA77C 

034776 


1 AT 

L43 


006554 


1 P 4 9 

L513 


052216 


LlOO 


AOAA70 


1 oc « 
Lc^l 


A07ACA 

Oc f 064 


1 TA7 

L347 


ATCAA A 

035040 


1 A TA 

L430 


Ail A % A A 

044144 


1 C% A 

L514 


AC M 

052254 




AOACAO 

Ue03Ue 


1 oco 


A07A7C 
Oc f0»6 


1 TC 

L35 


AA£A TA 

006430 


■ ATI 

L431 


Ail Jl 

044256 


1 C 4 P 

L515 


052264 


1 1 &C 


AOnCAO 

OeUSUc 


1 OCT 


A071 OO 

Oc rlcc 


1 TCA 

L330 


ATCAAC 

035046 


1 A T O 

l432 


AA A CA£ 

044546 


1 C 4 £. 

L516 


AP ^£ ^ A 

052620 


1 1 e^a 
LlOO 


A01 


1 OCA 


A07 1 f A 

Oc rllO 


1 TC 1 

L331 


ATC 1 A O 

035142 


1 ATT 

L433 


AA A CCA 

044550 


1 C 4 ^ 

L517 


AP VCT ii £. 

053546 


1 1 A7 
Llo ' 


021070 


1 occ 


A07t OO 

Ilic 


1 TCO 

L33C 


ATC f A O 

035142 


1 ATA 

L434 


AACA1 A 

045014 


L52 


A 4 A^ 9^ 

010636 


Lit 


AAC70A 

OvD lc'* 


1 OC£ 


A070TA 

Oc f £34 


1 TCT 

L333 


ATCOAA 

035204 


1 A TC 

l435 


AA CATA 

045030 


L520 


053752 


LI rU 


A01 1 TA 

Ucl 1 o4 


1 0C7 

Le3 ' 


ATA1 TA 

0301 34 


1 TCA 

L334 


ATC O f O 

035212 


1 A T£ 

L436 


Ail CAVii 

045034 


L521 


053756 


1 171 
LI 'I 


A01 7^A 

Oel » J*» 


1 o& 
Leo 


AAC 1 CA 
006134 


1 TCC 
L333 


ATCTTA 

035334 


1 A T7 

L437 


AACACO 

045052 


L522 


APJI A7£ 

054036 


LI fc 


A01 7'TO 
Uel r 


1 OiLA 

LeoO 


ATA1 AA 

030140 


1 TCC 

L336 


ATCA 1 C 

036416 


1 A A 

L44 


AA£C^£ 

006576 


L523 


054042 


1 1 77 

LI 1 o 


A01 7^ 


1 9&1 
LcDI 


AT AO OA 
03vec4 


1 TC7 
L33 1 


ATCATO 

03643c 


1 AAA 

L440 


AACOAA 

045200 


L524 


ACPA M M 

055044 


LI »*» 


AOOAOA 


LcOc 


ATAOAO 
U30c4c 


1 TC 
L36 


AAC ATA 

006434 


1 A A 1 

L441 


AACOAO 

045202 


L525 


ACC ACA 

055050 


1 1 7C 
LI r3 


A001 AO 
AO0 1 OA 


LcOd 


ATAOAC 


1 TCA 
L3DU 


ATCAAA 


1 AAO 

L442 


AA COAC 

045246 


L526 


ACC 4 Tl 

055172 


1 1 7<i 
LI 'O 


LcDO 


ATATCA 
U3U304 


1 TCI 
L36I 


ATCAAA 

036444 


1 AAT 

L443 


AA CA T% 

045472 


L527 


ACC t 

055262 


1 1 77 
LI f t 


A001 AO 


LcO 1 


ATACOO 


1 TCO 
L36c 


ATCCAC 
006346 


1 AAA 

L444 


AACCAA 

043600 


1 CT 

L53 


A t A£ il ^ 

010642 


Lc 


AACATO 

Ov^Ooe 


1 07 
Lc ' 


AAC 1 CA 
006164 


1 TCT 
L363 


ATCC7C 
0365(6 


1 AAC 

L445 


AA£.ACA 

046060 


1 CTA 

L530 


ACC If M 

055264 


L^U 


AA^750 


1 071 
Lc 1 1 


ATAC7A 


1 TCA 
L304 


ATC70A 

036 (cO 


1 AAC 

L446 


AA 7T7C 

047376 


1 CA 

L54 


A 4 Af M M 

010644 


LcUv 


AOOX3<^ 


1 070 
Lc 'C 


ATAC?!^ 
UOVJ 'D 


1 TCC 
LOD J 


ATC70A 
VlOO lev 


1 AA7 
L44 ( 


AA7A AA 

04 (400 


1 cc 
L55 


All T^A 

011374 


LeUI 


AOOTO<l 


1 07'X 
Lc ' 0 


ATA700 
V3U (CC 


1 TCC 
L366 


ATC70A 
036 (cO 


1 AC 

L43 


AACCAO 

006602 


L36 


A 4 4 ^ 4 A 

011410 


1 OAO 


AOOAXA 

Oec'Jj** 


1 OTA 
Lc <•» 


ATA770 
UOv lie 


LAD • 


ATC7AA 
UOO ( vV 


1 ACA 
L430 


ACAOTA 

030230 


L57 


A 4 4 C 4 ^ 

011512 


1 3AT 

LeUd 




1 07A 
Lc 'O 


ATI 1 TO 


1 T7 

LO ( 


UW0404 


1 Ad 
L43I 


ACA OA O 

050e42 


L6 


A/\09A 

005230 


LcW 




1 377 
Lc» » 


ATI OAO 


1 T7n 


UOO ( CU 


1 A^3 
L43i 


ACA OCA 
U30c00 


1 CA 

L60 


011516 


1 SAC 




LO 


UU jU34 


1 T71 
LO f I 


UOO (Oc 


1 ACT 
L43A 


ACAOCO 


1 CI 

L61 


At t £.£ 

011662 




AOT 1 7A 

veil IV 


1 'VA1 
LOUl 


ATI T^A 


1 T73 
LO re 


U30 (Oc 


1 AKA 
L43^ 


ACATAO 


1 ^ o 

L62 


At t f £ ^ 

011662 


1 3A7 
LeU r 




1 xno 


ATI ATA 
Vdl40U 


1 T7T 

LO r O 


AT7A1 O 


1 ACC 
L433 


ACAT1 A 
030314 


1 ^T 

L63 


At t f f ^ 

011662 


1 01 

L21 


AA^77A 


1 XtiX 

L0U3 


ATI AA<% 
U314"»0 


1 T7A 

LO it 


AAASAA 
U4UcU4 


1 ACC 
L436 


ACATTO 

030332 


1 CA 

L64 


At t f £ 

011662 


1 91 A 

LeIU 




1 TAA 


AT 1 A7A 


1 T7C 
L O ' 3 


AAAT7A 
0400 (•» 


1 AC7 
L'»3 I 


ACATTA 

030334 


1 cc 

L65 


A t t £ C£ 

011656 


LcII 




1 T1 

Ldl 


AACOCO 


1 T7C 
LO lO 


AAAC^C 
04U330 


1 ACA 
L400 


ACATCA 
030330 


1 cc 
L66 


At t ^9 Jl 

011734 


LclH 


A0170A 
Oc 3 'C*» 


1 T1 A 
LdlU 


ATI CTC 
U3I030 


1 T77 
L3 1 1 


AAACOA 
0400c4 


1 AC1 
L46I 


AC ACC 0 
03033c 


1 C7 

L67 


At t Til A 

011740 


1 oi T 
LcI2 


AOT7TO 


1 T1 1 
Ldll 


AT 1 7AA 
U3I IMM 


1 A 
L4 


AACA70 
Uv3VI(C 


1 ACO 
L46e 


ACACCA 

030360 


L7 


AAC A 

005230 


1 oi A 
LeI4 


AOAA7A 


1 T1 T 

LjIj 


ATOA1 C 
03cUIO 


1 AA 
L4V> 


AACC1 A 
OOD3IO 


1 ACT 
L463 


ACACAC 

0306 06 


1 7A 

L70 


A t t Til 1 

011742 


1 Oi ^ 
LcI3 


AOAA7l^ 


1 T1 A 
Loll 


ATOAOO 
VJOcUCC 


1 AAA 


AAACTA 


1 ACA 
L404 


ACACOA 
0306c0 


1 71 

L rl 


A1 01 OA 

012124 


1 Oi & 
LcIO 


AOAOC& 


1 T1 C 
LdI3 


ATOA7A 
UOev >4 


1 AA1 
L4UI 


AAACTC 
U4U030 


1 ACC 
L403 


ACACTC 
030636 


1 70 

L (2 


A f O 1 OA 

012124 


1 oi 7 
L£l f 


A Oil OCA 


1 T1 & 

Lolo 


AT0A7C 
03cU (6 


1 AAO 
L40e 


AAACCO 
04063e 


1 ACC 
L466 


ACACCA 

030650 


1 7T 

L73 


At ^ t ^ A 

012124 


1 OOA 


A0A07A 


1 T1 7 
Ldl r 


AT01 TA 
03cI34 


1 AAT 
L4U0 


AAACCA 
040004 


1 AC7 
L46 ( 


AC ACC O 

050662 


1 7A 

L (4 


A 1 O 1 TA 

012130 


1 001 

Leel 




1 TO 
Loe 


AACOCC 
UU6c66 


1 AAA 


AA 1 A7C 
04I0 (O 


1 A7A 
L4 (U 


ACA7AA 

U30 (04 


1 7C 

L (5 


A 1 OTAC 

012346 


Leec 


A0^7A0 


1 TOA 
LdcU 


AT01 CA 
U3cl 34 


1 AAC 
L4U3 


AA 1 1 AC 
04IIU0 


1 A71 
L4/1 


ACA7CO 
030 '32 


1 7C 

L (6 


A1 OTAC 

012346 


1 OO'T 
Leed 


AO&AOO 


1 T01 
Ldcl 


AT01 CA 
U3el6U 


1 AAC 
L4U6 


AA 1 OA 0 
U4I24C 


1 A70 
L4 (C 


AC1 ATO 

051032 


1 77 

L ( f 


A1 OTTC 

012336 






L3P5 


voce JC 




04 1 'SOP 
V*t A JVC 


L*t ( O 


AC 1 CiAfi 


MATNT s 


1 777S0 


L226 


026176 


L326 


032250 


L41 


006562 


L474 


051050 


MAPHO ' 


170202 


L227 


026272 


L327 


0Z2212 


L410 


041306 


L475 


051164 


HAPKER 


037740 


L230 


026350 


L33 


006332 


L411 


041336 


L476 


051254 


MAPLO - 


170200 


L231 


026366 


L330 


032272 


L412 


041350 


L477 


051264 


MAPLl - 


170204 


L232 


026372 


L331 


032410 


L413 


042536 


L5 


005150 


MhPPER 


035716 


L235 


026642 


L332 


032456 


L414 


042576 


L50 


006636 


MASK 


002320 


L236 


026652 


L333 


033034 


L415 


042636 


L500 


051604 


MBERR 


012602 



CVnjAAO MSVll-J MEMORY OIAG. MACRO VOS.Olb Friday 15-Feb-85 
Symbol table 



MEMDON 


013620 


MP#*A9 ^ 

MSG037 


A£ ^9 a P 

067315 


MSG126 


A^ a Of M 

071264 


MFPT ■ 


000007 


MSG03O 


A£ ^ 

067334 


MSG127 


A^ a w a 

071331 


MJPAT 


617430 


^A9 A 

MSG039 


067352 


MSG128 


A^ ■ 9PA 

071350 


MJTEST 


017324 


MSG040 


067374 


MSG129 


071471 


1 MKCNT 


016476 


MSG041 


Af ^ii OA 

067420 


hM^i^ a 9A 

nSGlJO 


AO a A OA 

071474 


' MKCONT 


015656 


MSG042 


A£ ^ d il C 

067445 


MSIZE 


A A A A 

002402 


MKCSRT 


017014 


MSG043 


067463 


M A9A 

MTA030 


AOOO 4 O 

022212 


nKrLAG 


002120 


nSG046 


067305 


mtST 


A4 O 

015562 


rmLuUr 


A« £AilA 

016040 


n5G047 


A£.7Cil A 

067540 


UTDAA'V 

niPAOo 


AO Jl OCA 

024750 




01 '244 


MC^Ail a 

n5G048 


067557 


UTD AAil 


AOC 4 A£ 

025106 




A1 7 1 Ail 

017104 


MCr"Ail A 

n5G049 


067617 


nTPA21 


AOC. Jl Jl O 

026442 


Mi inn « 


1 ' '3 'c 


nbu031 


AC 

067652 


MTD A Oil 


0272OO 


nriHi ■ 


1 ' ' 3 


nbb033 


AC7C7 1 
OO 'O '1 


MTDA 0£. 


027560 


nnRi: ■ 


1 ' '3 '0 


nSb036 


AC77 1 O 
06 ' '12 


nTroOo 


AOCA4 A 

025010 


nnn3 " 


172510 


nSG03B 


AC77ilC 

067745 


ni Kb w 


AOC 1 il O 

025142 


MMTD AD 


034126 


nbb061 


AC77C7 

067767 


nTPB21 


AOC il O O 

026472 


nnVct ■ 


AAA'lCA 
000230 


nSG062 


AC777C 

067776 


UTDDOil 


027326 


nONr Lb 


0022 '6 


nbb063 


A7AA1 C 

070016 


MTDDOC 

nTPB26 


A07T7il 

02/3 '4 


not ton 


AAO^A^ 


nbb0o4 


A7AA07 
0 '002 f 


nirC03 


AOCACA 

023030 




AA')^ 1 A 

002610 


nbb063 


A7AAT7 
0 '003 ' 


nirC21 


AOCCOC 

026526 


n5bA12 


A^ 1 O 1 A 

071210 


nSG066 


A7AAC 1 
0'0031 


MTDPOil 

H 1 rl.24 


A07Til O 

027342 


MCr" ATil 


A£7 5A7 

06 '207 


nbb06 ' 


A7A1 OA 
0'0120 


MTDPOC 

nirL26 


A07il TA 

027430 




Oo '243 


nbbO '0 


A7A1 07 

0 '012 ' 


MTOnAT 


AOCACC 

023066 




A7 1 it 

0 '1422 


nbbO '3 


A7A1 CA 

O '0160 


MTDAOI 

n 1 rU21 


AOCQCO 

026362 


nbbOOl 


A^C 1 OT 

063123 


nbbO '3 


n7A1 7fc 
0 '01 '6 


MTDAOC 

n 1 rU26 


A07ACA 

02 '430 


MCPAAO 


f\£. C OAC 

063203 


nbbO '6 


0 '0230 


n 1 ruuo 


024640 


MCP AAT 


063262 


nbbO ' 1 


0 '0231 


n 1 rooi 


024664 


MCr'AAil 


06336 ' 


MCPA^Q 

nobO 17 


0 '0263 


n 1 r002 


AOA7 1 a 
024 '16 




0634 '3 


HCPAAC 
nobOOS 


O '0311 


n 1 r003 


AO^I CO 


MCPAA^ 


0O330' 




n7A'?T<i 


n 1 rUUO 


AOCOI c 
Uc3clO 


MCPAAa 


A71 T7n 
0 '13 '0 


MCCHAQ 


n7A'?«IA 
O fOOS** 


MTDAA7 




MCr'AAO 


063344 


HCmOA 
nbbUW 


A7rtT7A 


HTOA1 A 


Oc33IO 


A 

nsuOio 


U63330 


HcrnQi 
nbbO^l 


u 'v*»i,<: 


MTOm A 


Vc30c'* 




U63036 


MCCAOO 




HTDm 7 


UcD03U 




063 '44 






n 1 r Ocv 


AOC 1 OC 




066036 






HTonoo 

n 1 r Uee 




MCr'AI A 

nbu014 


A^^A^A 

066060 


nbuioi 


O '0430 


n 1 r vov 




n5b015 


066062 


MCC1 A3 

nbul02 


U rv/300 


MTDOT1 


Vt «6 


MCr*A1 £ 


066064 


MCr 1 AT 

nbbl03 


O '0333 


n 1 r\l3c 


Vc f 33'» 


MCr*A1 1 

n5b017 


0660 '6 


MCC1 f\A 

nobl04 


O 'U33 1 


n 1 rUOd 


A07CAA 
Uc rOOO 


Mcr* A 1 o 


A^^l A7 

06610' 


nob 103 


A7nR& 1 
U '0301 




A077AA 


Mw/'AI O 

nbuOiY 


A^^ 1 1 O 

0OO112 


MCCI AC 

nbblOO 


mnt^XA 
u » ue o«» 


n 1 ru 33 




MCCA3A 


A&& lie 


nbbiU ' 


\J 'VI03C 


MTPOTA 
n 1 rVIOD 


UdVV ' C 




A&& 1 ^7 
06613 ' 


nbblln 


U033 fO 


HTDAT7 


VdOOlD 


MC^A^O 

nbbOec 


OOD '23 


MCP 1 t D 

nbbllD 


ACC AA 1 

066041 


HTDHAI 


UOVO 'U 


MCf*A97 


OOO '4 / 


nbblK. 


066043 


HTDAAO 
n 1 rUHc 


AT ASA 0 


MCPAOC 


OOO 'D3 


nbbliu 


0660<»3 




AT 1 ATA 


MCCA3& 

nbbUcD 


Afc7An7 
OO 'OO ' 


Mcr tin 
nbbllO 


A7n707 


MTDAAA 


ATI J3A 


MCf;A37 


OO lyjci 


nbblli 


n7n77i 


MTDnA<; 

n 1 rVIH J 


ATI SAA 






Mcri 1 o 


07 1 OPS 


MTP04f^ 

I 1 1 r V 


O'^l 734 


MSG029 


067052 


MSG113 


071057 


MTP047 


032274 


MSG030 


067072 


MSG117 


071112 


MTST3 


011414 


MSG031 


067111 


MSG119 


071124 


MTOOOO 


017510 


MSG032 


067151 


MSG120 


071133 


MTOOOl 


017544 


MSG033 


067170 


MSG121 


071154 


MT0002 


017640 


MSG035 


067273 


MSG122 


071174 


MT0003 


017754 


MSG036 


067276 


MSG125 


071242 


MT0004 


020070 
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MT0005 020140 

MT0006 020222 

MT0007 020256 

MTOOlO 020320 

MT0014 020354 

MT0017 020434 

MT0020 020456 

MT0021 020536 

MT0022 021026 

MT0023 021060 

MT0024 021124 

MT0026 021332 

MT0027 021610 

MT0030 022200 

MT0031 022454 

MT0032 022644 

MT0033 023160 

MT0034 023346 

MT0O35 023446 

MT0036 023560 

MT0037 023622 

MT0041 023660 

MT0042 023740 

MT0043 023774 

MT0044 024024 

MT0045 024104 

MT0046 024134 

MT0047 024164 

MT0999 024220 

M71 015636 

MT2 015642 

MUT 002110 

M1184 071100 

NC 047400 

NEMCNT 002070 

NEUBAN 002310 

NEUKER 037672 

NEULOA 037774 

NOAPT 051514 

NOCH 054552 

NOERRO 002430 

NOFSMO 002426 

NONEM 002100 

NONEXI 034050 

NOOJ 033034 

NOOJl 033144 

NOPAR 002076 

NORES 003722 

NOSCOP 002440 

NOSUPE 002456 

NOTAB 002372 

NOTRCE 051200 

NOUBMT 071547 

N022BI 002454 

NULLFL 002344 

NXTCSR 005752 

OLDCAC 002302 



QLDCSR 002156 
ONES 002614 
PADDRE 002036 
PAFBAF 014756 
PAFBAU 015106 
PARBAF 015260 
PARBAU 015410 
PARCNT 002072 
PARITY 033744 
PARTHE 002304 
PARVEC- 000114 
PASCNT 002570 
PASFLG 002264 
PASSNO 002266 
PATERR 002074 
PATPLU 004644 
PATTER 002112 
PCBUMP 002326 
PCONFI 032722 
PCONFS 033334 
PCONFI 033242 
PC0NF2 033302 
PDPllO 034140 
PDl 045472 
PERA05 047614 
PERBNK 050446 
PERECC 050526 
PERRAB 050264 
PERRAU 050212 
PERRA3 045040 
PERRA7 050336 
PERR01» 104427 
PERR02> 104430 
PERR03» 104431 
PERR04« 104432 
PERR05 047610 
PERR06 047636 
PERR07» 104433 
PERR10= 104434 
PERR11= 104435 
PERR12* 104436 
PERR13= 104437 
PERR14» 104440 
PERR15- 104441 
PERR16« 104442 
PERR17" 104443 
PERR20' 104444 
PERR21- 104445 
PERR22- 104446 
PERR23- 104447 
PERR24« 104450 
PERR25" 104451 
PERR26- 104452 
PERR27- 104453 
PfcRR30« 104454 
PERR31» 104455 
PERR32- 104456 



CVMJAAO ttSVll-J MEMORY OIAG. MACRO VOS.Olb Friday 15 Feb-85 
Symbol tabic 



PERR33" 


104457 


SAV30 


003706 


SUPDRO 


002160 


PERR34« 


104460 


SAV32 


003710 


SUPDRl 


002162 


PERR35- 


104461 


SAV4 


002270 


SUPDR2 


002164 


PERR36- 


104462 


SBEMSK 


002252 


SUPDR3 


002166 


PERR37- 


104463 


SBENT 


016756 


SUPDR4 


002170 


PERR40* 


104464 


SBESYN 


026422 


SUPDR5 


002172 


PERR41" 


104465 


SBETES 


016500 


SUPDR6 


002174 


PERR42- 


104466 


SCOPE « 


000004 


SUPLIM 


047456 


PERR43- 


104467 


SDPARO- 


172260 


SUPSTK= 


000740 


PERXOR 


050422 


SDPAR5- 


172272 


SWAPAT 


002634 


PFECOF 


052732 


SDPAR6* 


172274 


SUR 


002636 


PFECDH 


052672 


SDPAR7« 


172276 


SUREG = 


000176 


PFECDT 


052722 


SEEDHI 


002602 


SUREND 


055054 


PFECEM 


052636 


SEEDLO 


002604 


SMRFLG 


002566 


PFECUS 


052626 


SELONL 


002002 


SUO 


000001 


PFLAG 


002122 


SETPAT 


040510 


SWl 


000002 


PGMCSR 


002532 


SHADLl 


011444 


SUlO = 


002000 


PHEBE 


012604 


SHUTUP 


040636 


SUll = 


004000 


PHY ADD 


002040 


SIPARO= 


172240 


SU12 » 


010000 


PMEMFL 


002142 


SIPAR3» 


172246 


SW13 = 


020000 


PROTYP 


004010 


SIPAR5" 


172252 


SW14 = 


040000 


PSIZE 


002404 


SIPAR6= 


172254 


SU15 = 


100000 


PSU 


177776 


SIPDRO= 


172200 


SU2 


0C0004 


PTABLE 


030276 


SIZE = 


040000 


SU3 


000010 


PURVEC' 


000024 


SKIPKA 


002010 


SU4 


000020 


QUICK 


002436 


SKIPMK 


002342 


SU5 


000040 


QUIT 


040534 


SKJ 


051226 


SW6 


000100 


QUITl 


040600 


SKPERR 


002066 


SU7 


000200 


QVFLAG 


002346 


SKU6 


037012 


SW8 


000400 


RANOOD 


027410 


SKUJ 


012606 


SU9 » 


001000 


RDCHR ■ 


104411 


SOBK 


002572 


SYNREG" 


104514 


RDDEC ' 


104414 


SOBLEN= 


000056 


SYSSIZ 


004012 


RDLIN - 


104412 


SOFTPA 


002620 


TAG2* 


011046 


RDOCT " 


104413 


SOURCE 


002312 


TAG3$ 


011102 


READCS' 


104426 


SPLTCS 


002240 


TAG44 


024364 


REAOON 


002410 


SSP -it000006 


TAG70* 


052736 


REALPA 


002300 


ST 


177776 


TAG71* 


052746 


REFRES 


027166 


STACK = 


002000 


TAG72* 


052756 


REFSUB 


027236 


START 


003670 


TAG73J 


053026 


REGCOP 


032470 


STARTl 


000300 


TAG74$ 


053066 


RELENT 


037022 


START2 


000310 


TAG75* 


053100 


RELOCA 


036402 


START3 


000200 


TAG76* 


053112 


RELOCl 


037036 


STAR27 


021634 


TAG77J 


053156 


RESREG- 


104416 


STOPOK 


002420 


TAG78i 


053164 


RESTAR 


002626 


STRIPE 


002366 


TAG79* 


053244 


RESVEC- 


000010 


SU6AAA 


004702 


TAG9* 


010710 


RESO 


041350 


SUBAPB 


005032 


TBG4$ 


024542 


RESl 


041430 


SUBAAI 


011440 


TCFIGl 


033404 


RES2 


C41576 


SUBAAP 


012766 


TCFIG2 


033444 


RLFLAG 


002126 


SU6AAR 


012172 


TCFIG3 


033600 


RRFLAG 


002124 


SUBAAS 


010454 


TCONFI 


033336 


RTNVAL>KOOOOOO 


SUCCES 


002334 


TEMP 


002434 


RUCSR 


006220 


SUPOOA 


002262 


TESTAO 


002412 


SAVCSR 


002154 


SUPOOl 


024270 


TESTMO 


002552 


SAVMON 


002274 


SUPD02 


024304 


TIME 


002340 


SAVPAR 


002272 


SUPD03 


024446 


TIMEOU 


034114 


SAVREG- 


104415 


SUP004 


024462 


TKVEC = 


000060 
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TMFLAG 002134 
TOOMAN 002406 
TOTCSR 002224 
TRACE 006216 
TRAPVE* 000034 
TSTBAN 011302 
TSTDAT 002246 
TSTRDl 034542 
TSTREA= 104510 
TSTl 005630 
TST2 010460 
TST3 010644 
TST4 011526 
TST5 013552 
TST6 013624 
TYPDS = 104405 
TYPEIT= 104401 
TYPOC = 104402 
TYPOS = 104403 
TYPSO = 000000 
TYPSl = 000002 
TYPS2 = 000000 
TYPS3 = 000000 
TYPS4 = 000000 
TYPS5 « 000000 
TYPS6 » 000002 
UOPARO- 177660 
UDPAR7= 177676 
UFDSET 002000 
UIPARO- 177640 
UIPARl- 177642 
UIPAR2* 177644 
UIPAR3= 177646 
UIPAR4" 177650 
UIPAR5- 177652 
UIPAR6» 177654 
UIPDRO" 17760'^ 
UNITOP 002416 
UNMAP 040026 
UNRELO 037214 
UPPFLG 002265 
USERMA 037610 
USESTK= 000700 
USP =*000006 
VMKOR 003712 
UARNl 010776 
UARN2 024762 
WARN3 024776 
UARN4 025022 
UARN5 025036 
UASDBE- 104500 
UASSBE^ 104476 
UASIDB' 104501 
UAS1SB> 104477 
UHICHC 044670 
UOOPEN 046654 
UQOPS 046306 



UOOPSA 046704 

UOOPUP 046472 

WORST 002600 

XOCHAR 047246 

XXDPCH 002354 

ZEROS 002336 

JAPTHD 056750 

$AUTO 002062 

$BANK 002013 

$BASE 056722 

♦BELL 002653 

JCACHF 034256 

JCACHN 034232 

JCBCSR 034672 

»CBREG 035662 

JCBICS 034714 

*CDU1 056726 

$CDU2 056730 

JCHARC 047434 

*CHKDI 035266 

JCHKID 035302 

fCKSUR 054530 

tCLRCS 035244 

ICLRIC 035256 

«CMTAG 002000 

$CMTGE 002544 

♦CNTLC 055736 

$CNTLG 055750 

JCNTLK 055144 

♦CNTLU 055743 

♦CPUOP 056674 

$CRLF 002660 

*DBLK 054520 

«0B20 056526 

IDOUO 056734 

«D0U1 056736 

ID0U2 056740 

$0DU3 056742 

$0DU4 056744 

$DDU5 056746 

$0DU7 056732 

JOEENE 034222 

JDEVCT 056656 

JOEVM 056724 

$DI0D0= 000000 

«D0AGA 014156 

IDOAGN 014052 

«O0UN 045722 

JDTBL 054510 

$ECC0I 034570 

$ECCIN 034616 

$ECC10 034604 

(ECCII 034632 

lENASB 034644 

$ENA1S 034660 

tENDAD 014042 

$ENERG 034212 



CVMJAAO MSVll-J MEMORY OIAG. MACRO VOS.Olb Friday 15-Feb-85 
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tENV 


056666 


*LL 


000106 


m = 


000000 


lENVM 


056667 


«LOA0C 


034274 


♦PASS 


056654 


lEOP 


013676 


ILPADR 


002622 


♦PASTM 


056756 


IERFL6 


002C14 


*LPERR 


002624 


♦PATMA 


002012 


4ERRGE 


035412 


♦L* 


000000 


♦PEROl 


047456 


lERROR 


051502 


$ MAORI 


056700 


♦PER02 


047504 


4ERRTB 


057274 


$MA0R2 


056704 


♦PER03 


047532 


♦ERRTY 


052316 


$MADR3 


056710 


♦PER04 


047562 


♦ERTTL 


002630 


$MA0R4 


056714 


♦PER07 


047644 


♦ESCAP 


002362 


♦MAIL 


056646 


♦PERIO 


047666 


♦ETA8L 


056666 


♦MAMSl 


056676 


♦PERU 


047716 


lETENO 


056750 


JMAMS2 


056702 


♦PER12 


047736 


lEXHAL 


040630 


JMAMS3 


056706 


♦PER13 


047760 


♦E* 


000001 


<MAMS4 


056712 


♦PER14 


050000 


♦FATAL 


056650 


IMBAOR 


056752 


♦PER15 


050022 


♦FILLC 


002652 


IMNEU 


055766 


♦PER16 


050044 


JFILLS 


002357 


1 MSG AO 


056662 


♦PER17 


050064 


♦Fl 


000000 


(MSGLG 


056664 


♦PER20 


050102 


IGTSUR 


054704 


JMSGTY 


056646 


♦PER21 


050120 


IHALT 


052100 


IMSUR 


055755 


♦PER22 


050140 


IHALT2 


057024 


$MTYP1 


056677 


♦PER23 


050156 


♦HIBTS 


056750 


JMTYP2 


056703 


♦PER24 


050174 


♦HIOCT 


056146 


IMTYP3 


056707 


♦PER25 


044756 


♦ILLUP 


046300 


♦MTYP4 


056713 


♦PER26 


050364 


4 TUUAl 

IINVAL 




iklDTOA 
«NU 1 NH 


AC7AOA 


♦ rcK^ f 


030404 


IITEMB 


002015 


INULL 


002356 


♦PER30 


045204 


11$ 


000001 


♦NUTST- 


000001 


♦PER31 


050574 


1 KERNE 


034202 


$OCNT 


054300 


♦PER32 


050672 


*KMAP 


036310 


*OCTVL 


056630 


♦PER33 


050740 


»K$ 


000103 


$0CT8 = 


056634 


♦PER34 


051020 


»L 


000110 


$OHOOE 


054302 


♦PER35 


051052 


*LF 


002661 


♦OVER 


051416 


♦PER36 


051106 



. abs. 071612 000 (ru.i .gbl , abs.ovr) 
000000 001 (ru.i.lcl.rel.con; 

Errors detected: 0 



*** Assembler statistics 



Work file reads: 1286 

Uork file writes: 949 

Size of work file: 25487 Uords ( 100 Pages) 

Size of core pool: 17688 Uords ( 68 Pages) 

Operating system: RSX-llM/PLUS 

Elapsed time: 00:32:57.57 
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♦PER37 051136 

♦PER40 051142 

♦PURDN 045352 

♦PURUP 045726 

♦QUES 002657 

♦R - 17777/ 

♦RANU 056432 

♦RDCHR 055264 

♦RDDEC 056150 

♦RDLIN 055414 

♦ROOCT 056000 

♦READC 034370 

♦RESRE 056374 

♦SAVRE 056336 

♦SAVR6 046304 

♦SCOPE 051146 

♦STN « 000001 

♦SVLAD 051402 

♦SV^ - 000000 

♦SUR ' 163000 

♦SUREG 056670 

♦SYNRE 035700 

♦T « 000531 

♦TESTN 056652 

♦TKB 002644 

♦TKS 002642 

♦TN * 000007 

♦TPB 002650 

♦TPFLG 002360 

♦TPS 002646 

♦TRAP 056764 



SEQ 0445 

♦TRAP2 057006 
♦TRPAD 057026 
♦TSTM 056754 
♦TSTRD 034410 
♦TTYIN 055712 
♦TYPOS 054304 
♦TYPE 047122 
♦TYPEC 047250 
♦TYPEX 047436 
♦TYPOC 054102 
♦TYPON 054116 
♦TYPOS 054056 
♦Tl - 000000 
♦T2 - 000530 
♦UNIT 056660 
♦UNITM 056760 
♦USUR 056672 
♦VECTl 056716 
♦VECT2 056720 
♦UASDB 035100 
♦UASSB 034734 
♦UASIO 035214 
♦UASIS 035050 
♦XTSTR 051274 
♦Y^ « 000000 
♦ZAP42 014022 
m » 000000 
♦♦S = 000000 
♦♦T = 000512 
♦♦TT = 000520 
♦OFILL 054301 



